|
800
|
How can copy and paste the selection to Microsoft Word, any OLE compliant application, as a snapshot
Gantt1->BeginUpdate();
Gantt1->VisualAppearance->Add(1,TVariant("c:\\exontrol\\images\\normal.ebn"));
Gantt1->HTMLPicture[L"p1"] = TVariant("c:\\exontrol\\images\\card.png");
Gantt1->HTMLPicture[L"p2"] = TVariant("c:\\exontrol\\images\\sun.png");
Gantt1->AutoDrag = Exganttlib_tlb::AutoDragEnum::exAutoDragCopySnapShot;
Gantt1->LinesAtRoot = Exganttlib_tlb::LinesAtRootEnum::exNoLinesAtRoot;
Gantt1->HasLines = Exganttlib_tlb::HierarchyLineEnum::exThinLine;
Gantt1->ShowFocusRect = false;
Gantt1->DefaultItemHeight = 26;
Gantt1->Columns->Add(L"Task");
Exganttlib_tlb::IChartPtr var_Chart = Gantt1->Chart;
var_Chart->ShowNonworkingDates = false;
var_Chart->set_FirstVisibleDate(TVariant(TDateTime(2000,12,29).operator double()));
var_Chart->set_PaneWidth(false,96);
var_Chart->LevelCount = 2;
Exganttlib_tlb::IBarPtr var_Bar = var_Chart->Bars->get_Item(TVariant("Task"));
var_Bar->Color = 0x1000000;
var_Bar->Height = 18;
Exganttlib_tlb::IItemsPtr var_Items = Gantt1->Items;
long h = var_Items->AddItem(TVariant("<img>p1:32</img>Group 1"));
var_Items->set_CellCaptionFormat(TVariant(h),TVariant(0),Exganttlib_tlb::CaptionFormatEnum::exHTML);
var_Items->set_ItemDivider(h,0);
var_Items->set_ItemBold(h,true);
long h1 = var_Items->InsertItem(h,TNoParam(),TVariant("Task 1"));
var_Items->AddBar(h1,TVariant("Task"),TVariant(TDateTime(2001,1,2).operator double()),TVariant(TDateTime(2001,1,4).operator double()),TVariant("K1"),TNoParam());
long h2 = var_Items->InsertItem(h,TNoParam(),TVariant("Task 2"));
var_Items->AddBar(h2,TVariant("Task"),TVariant(TDateTime(2001,1,5).operator double()),TVariant(TDateTime(2001,1,7).operator double()),TVariant("K2"),TNoParam());
var_Items->AddLink(TVariant("L1"),h1,TVariant("K1"),h2,TVariant("K2"));
var_Items->set_Link(TVariant("L1"),Exganttlib_tlb::LinkPropertyEnum::exLinkText,TVariant("L1"));
long h3 = var_Items->InsertItem(h,TNoParam(),TVariant("Task 3"));
var_Items->AddBar(h3,TVariant("Task"),TVariant(TDateTime(2001,1,8).operator double()),TVariant(TDateTime(2001,1,10).operator double()),TVariant("K3"),TNoParam());
var_Items->AddLink(TVariant("L2"),h2,TVariant("K2"),h3,TVariant("K3"));
var_Items->set_Link(TVariant("L2"),Exganttlib_tlb::LinkPropertyEnum::exLinkText,TVariant("L2"));
h = var_Items->AddItem(TVariant("<img>p2:32</img>Group 2"));
var_Items->set_CellCaptionFormat(TVariant(h),TVariant(0),Exganttlib_tlb::CaptionFormatEnum::exHTML);
var_Items->set_ItemBold(h,true);
var_Items->set_ItemDivider(h,0);
h1 = var_Items->InsertItem(h,TNoParam(),TVariant("Task"));
var_Items->AddBar(h1,TVariant("Task"),TVariant(TDateTime(2001,1,2).operator double()),TVariant(TDateTime(2001,1,4).operator double()),TVariant("K1"),TNoParam());
var_Items->set_ExpandItem(0,true);
Gantt1->EndUpdate();
|
|
799
|
How can copy and paste the selection to Microsoft Word, any OLE compliant application, as a image
Gantt1->BeginUpdate();
Gantt1->HTMLPicture[L"p1"] = TVariant("c:\\exontrol\\images\\card.png");
Gantt1->HTMLPicture[L"p2"] = TVariant("c:\\exontrol\\images\\sun.png");
Gantt1->Chart->set_PaneWidth(true,0);
TVariant var_HTMLPicture = TVariant(Gantt1->HTMLPicture[L"aka1"]);
Gantt1->HeaderHeight = 24;
Gantt1->DefaultItemHeight = 48;
Gantt1->DrawGridLines = Exganttlib_tlb::GridLinesEnum::exRowLines;
Gantt1->GridLineColor = RGB(240,240,240);
Gantt1->SelBackMode = Exganttlib_tlb::BackModeEnum::exTransparent;
Gantt1->ColumnAutoResize = false;
Gantt1->ContinueColumnScroll = false;
/*
Select the Component\Import Component...\Import a Type Library,
to import the following Type Library:
Microsoft ActiveX Data Objects 6.1 Library
TypeLib: msado15.dll
to define the namespace: Adodb_tlb
*/
//#include "ADODB_TLB.h"
Adodb_tlb::_RecordsetPtr rs = Variant::CreateObject(L"ADOR.Recordset");
rs->Open(TVariant("Orders"),TVariant("Provider=Microsoft.ACE.OLEDB.12.0;Data Source=C:\\Program Files\\Exontrol\\ExGantt\\Sample\\Access\\SAMPLE.MDB"),Adodb_tlb::CursorTypeEnum::adOpenStatic,Adodb_tlb::LockTypeEnum::adLockOptimistic,0);
Gantt1->DataSource = (IDispatch*)rs;
Gantt1->Columns->get_Item(TVariant(0))->set_Def(Exganttlib_tlb::DefColumnEnum::exCellCaptionFormat,TVariant(1));
Gantt1->Columns->get_Item(TVariant(0))->FormatColumn = L"value + ` <img>p` + (1 + (value mod 3 ) ) + `</img>`";
Gantt1->Columns->get_Item(TVariant(0))->Width = 112;
Gantt1->Columns->get_Item(TVariant(1))->set_Def(Exganttlib_tlb::DefColumnEnum::exCellHasCheckBox,TVariant(1));
Gantt1->Columns->get_Item(TVariant(2))->set_LevelKey(TVariant("1"));
Gantt1->Columns->get_Item(TVariant(3))->set_LevelKey(TVariant("1"));
Gantt1->Columns->get_Item(TVariant(4))->set_LevelKey(TVariant("1"));
Gantt1->AutoDrag = Exganttlib_tlb::AutoDragEnum::exAutoDragCopyImage;
Gantt1->SingleSel = false;
Exganttlib_tlb::IItemsPtr var_Items = Gantt1->Items;
long h = var_Items->get_ItemByIndex(1);
var_Items->set_SelectItem(h,true);
h = var_Items->get_ItemByIndex(2);
var_Items->set_SelectItem(h,true);
h = var_Items->get_ItemByIndex(3);
var_Items->set_SelectItem(h,true);
var_Items->set_LockedItemCount(Exganttlib_tlb::VAlignmentEnum::BottomAlignment,1);
h = var_Items->get_LockedItem(Exganttlib_tlb::VAlignmentEnum::BottomAlignment,0);
var_Items->set_CellCaption(TVariant(h),TVariant(1),TVariant("<font ;16>Click the selection and <b>wait to start dragging</b>, and then drop to Microsoft Word, ..."));
var_Items->set_CellSingleLine(TVariant(h),TVariant(1),Exganttlib_tlb::CellSingleLineEnum::exCaptionWordWrap);
var_Items->set_CellCaptionFormat(TVariant(h),TVariant(1),Exganttlib_tlb::CaptionFormatEnum::exHTML);
var_Items->set_CellHAlignment(TVariant(h),TVariant(1),Exganttlib_tlb::AlignmentEnum::CenterAlignment);
var_Items->set_ItemDivider(h,1);
var_Items->set_ItemDividerLineAlignment(h,Exganttlib_tlb::DividerAlignmentEnum::DividerTop);
Gantt1->EndUpdate();
|
|
798
|
How can copy and paste the selection to Microsoft Word, Excel or any OLE compliant application, as a text
Gantt1->BeginUpdate();
Gantt1->Chart->set_PaneWidth(true,0);
Gantt1->ColumnAutoResize = false;
Gantt1->ContinueColumnScroll = false;
/*
Select the Component\Import Component...\Import a Type Library,
to import the following Type Library:
Microsoft ActiveX Data Objects 6.1 Library
TypeLib: msado15.dll
to define the namespace: Adodb_tlb
*/
//#include "ADODB_TLB.h"
Adodb_tlb::_RecordsetPtr rs = Variant::CreateObject(L"ADOR.Recordset");
rs->Open(TVariant("Orders"),TVariant("Provider=Microsoft.ACE.OLEDB.12.0;Data Source=C:\\Program Files\\Exontrol\\ExGantt\\Sample\\Access\\SAMPLE.MDB"),Adodb_tlb::CursorTypeEnum::adOpenStatic,Adodb_tlb::LockTypeEnum::adLockOptimistic,0);
Gantt1->DataSource = (IDispatch*)rs;
Gantt1->Columns->get_Item(TVariant(2))->set_LevelKey(TVariant("1"));
Gantt1->Columns->get_Item(TVariant(3))->set_LevelKey(TVariant("1"));
Gantt1->Columns->get_Item(TVariant(4))->set_LevelKey(TVariant("1"));
Gantt1->AutoDrag = Exganttlib_tlb::AutoDragEnum::exAutoDragCopyText;
Gantt1->SingleSel = false;
Exganttlib_tlb::IItemsPtr var_Items = Gantt1->Items;
long h = var_Items->get_ItemByIndex(1);
var_Items->set_SelectItem(h,true);
h = var_Items->get_ItemByIndex(3);
var_Items->set_SelectItem(h,true);
h = var_Items->get_ItemByIndex(4);
var_Items->set_SelectItem(h,true);
h = var_Items->get_ItemByIndex(5);
var_Items->set_SelectItem(h,true);
var_Items->set_LockedItemCount(Exganttlib_tlb::VAlignmentEnum::BottomAlignment,1);
h = var_Items->get_LockedItem(Exganttlib_tlb::VAlignmentEnum::BottomAlignment,0);
var_Items->set_CellCaption(TVariant(h),TVariant(0),TVariant("<font ;16>Click the selection and <b>wait to start dragging</b>, and then drop to Microsoft Word, Excel, ..."));
var_Items->set_CellSingleLine(TVariant(h),TVariant(0),Exganttlib_tlb::CellSingleLineEnum::exCaptionWordWrap);
var_Items->set_CellCaptionFormat(TVariant(h),TVariant(0),Exganttlib_tlb::CaptionFormatEnum::exHTML);
var_Items->set_CellHAlignment(TVariant(h),TVariant(0),Exganttlib_tlb::AlignmentEnum::CenterAlignment);
var_Items->set_ItemDivider(h,0);
var_Items->set_ItemDividerLineAlignment(h,Exganttlib_tlb::DividerAlignmentEnum::DividerTop);
Gantt1->EndUpdate();
|
|
797
|
Is it possible to change the indentation during the drag and drop
Gantt1->BeginUpdate();
Gantt1->VisualAppearance->Add(1,TVariant("c:\\exontrol\\images\\normal.ebn"));
Gantt1->AutoDrag = Exganttlib_tlb::AutoDragEnum::exAutoDragPositionAny;
Gantt1->LinesAtRoot = Exganttlib_tlb::LinesAtRootEnum::exNoLinesAtRoot;
Gantt1->HasLines = Exganttlib_tlb::HierarchyLineEnum::exSolidLine;
Gantt1->HasButtons = Exganttlib_tlb::ExpandButtonEnum::exWPlus;
Gantt1->ShowFocusRect = false;
Gantt1->SelBackMode = Exganttlib_tlb::BackModeEnum::exTransparent;
Gantt1->Columns->Add(L"Task");
Exganttlib_tlb::IChartPtr var_Chart = Gantt1->Chart;
var_Chart->ShowNonworkingDates = false;
var_Chart->set_FirstVisibleDate(TVariant(TDateTime(2000,12,29).operator double()));
var_Chart->set_PaneWidth(false,128);
var_Chart->LevelCount = 2;
var_Chart->Bars->get_Item(TVariant("Task"))->Color = 0x1000000;
Exganttlib_tlb::IItemsPtr var_Items = Gantt1->Items;
long h = var_Items->AddItem(TVariant("Group 1"));
var_Items->set_ItemBold(h,true);
var_Items->set_ItemDivider(h,0);
long h1 = var_Items->InsertItem(h,TNoParam(),TVariant("Task 1"));
var_Items->AddBar(h1,TVariant("Task"),TVariant(TDateTime(2001,1,2).operator double()),TVariant(TDateTime(2001,1,4).operator double()),TVariant("K1"),TNoParam());
long h2 = var_Items->InsertItem(h1,TNoParam(),TVariant("Task 2"));
var_Items->AddBar(h2,TVariant("Task"),TVariant(TDateTime(2001,1,15).operator double()),TVariant(TDateTime(2001,1,17).operator double()),TVariant("K4"),TNoParam());
h2 = var_Items->InsertItem(h1,TNoParam(),TVariant("Task 3"));
var_Items->AddBar(h2,TVariant("Task"),TVariant(TDateTime(2001,1,5).operator double()),TVariant(TDateTime(2001,1,7).operator double()),TVariant("K2"),TNoParam());
var_Items->AddLink(TVariant("L1"),h1,TVariant("K1"),h2,TVariant("K2"));
var_Items->set_Link(TVariant("L1"),Exganttlib_tlb::LinkPropertyEnum::exLinkText,TVariant("L1"));
long h3 = var_Items->InsertItem(h,TNoParam(),TVariant("Task 3"));
var_Items->AddBar(h3,TVariant("Task"),TVariant(TDateTime(2001,1,8).operator double()),TVariant(TDateTime(2001,1,10).operator double()),TVariant("K3"),TNoParam());
var_Items->AddLink(TVariant("L2"),h2,TVariant("K2"),h3,TVariant("K3"));
var_Items->set_Link(TVariant("L2"),Exganttlib_tlb::LinkPropertyEnum::exLinkText,TVariant("L2"));
var_Items->set_ExpandItem(h,true);
var_Items->set_ExpandItem(h1,true);
h = var_Items->AddItem(TVariant("Group 2"));
var_Items->set_ItemBold(h,true);
var_Items->set_ItemDivider(h,0);
var_Items->set_LockedItemCount(Exganttlib_tlb::VAlignmentEnum::BottomAlignment,1);
h = var_Items->get_LockedItem(Exganttlib_tlb::VAlignmentEnum::BottomAlignment,0);
var_Items->set_CellCaption(TVariant(h),TVariant(0),TVariant(String("Click a row, and move by dragging <b>up, down</b> to change the row's parent or <b>left,right</b> to increase or decrease the i") +
"ndentation."));
var_Items->set_CellSingleLine(TVariant(h),TVariant(0),Exganttlib_tlb::CellSingleLineEnum::exCaptionWordWrap);
var_Items->set_CellCaptionFormat(TVariant(h),TVariant(0),Exganttlib_tlb::CaptionFormatEnum::exHTML);
Gantt1->EndUpdate();
|
|
796
|
Is it possible to allow moving an item to another, but keeping its indentation
Gantt1->BeginUpdate();
Gantt1->VisualAppearance->Add(1,TVariant("c:\\exontrol\\images\\normal.ebn"));
Gantt1->AutoDrag = Exganttlib_tlb::AutoDragEnum::exAutoDragPositionKeepIndent;
Gantt1->LinesAtRoot = Exganttlib_tlb::LinesAtRootEnum::exNoLinesAtRoot;
Gantt1->HasLines = Exganttlib_tlb::HierarchyLineEnum::exThinLine;
Gantt1->ShowFocusRect = false;
Gantt1->Columns->Add(L"Task");
Exganttlib_tlb::IChartPtr var_Chart = Gantt1->Chart;
var_Chart->ShowNonworkingDates = false;
var_Chart->set_FirstVisibleDate(TVariant(TDateTime(2000,12,29).operator double()));
var_Chart->set_PaneWidth(false,96);
var_Chart->LevelCount = 2;
var_Chart->Bars->get_Item(TVariant("Task"))->Color = 0x1000000;
Exganttlib_tlb::IItemsPtr var_Items = Gantt1->Items;
long h = var_Items->AddItem(TVariant("Group 1"));
var_Items->set_ItemDivider(h,0);
var_Items->set_ItemBold(h,true);
long h1 = var_Items->InsertItem(h,TNoParam(),TVariant("Task 1"));
var_Items->AddBar(h1,TVariant("Task"),TVariant(TDateTime(2001,1,2).operator double()),TVariant(TDateTime(2001,1,4).operator double()),TVariant("K1"),TNoParam());
long h2 = var_Items->InsertItem(h,TNoParam(),TVariant("Task 2"));
var_Items->AddBar(h2,TVariant("Task"),TVariant(TDateTime(2001,1,5).operator double()),TVariant(TDateTime(2001,1,7).operator double()),TVariant("K2"),TNoParam());
var_Items->AddLink(TVariant("L1"),h1,TVariant("K1"),h2,TVariant("K2"));
var_Items->set_Link(TVariant("L1"),Exganttlib_tlb::LinkPropertyEnum::exLinkText,TVariant("L1"));
long h3 = var_Items->InsertItem(h,TNoParam(),TVariant("Task 3"));
var_Items->AddBar(h3,TVariant("Task"),TVariant(TDateTime(2001,1,8).operator double()),TVariant(TDateTime(2001,1,10).operator double()),TVariant("K3"),TNoParam());
var_Items->AddLink(TVariant("L2"),h2,TVariant("K2"),h3,TVariant("K3"));
var_Items->set_Link(TVariant("L2"),Exganttlib_tlb::LinkPropertyEnum::exLinkText,TVariant("L2"));
var_Items->set_ExpandItem(h,true);
h = var_Items->AddItem(TVariant("Group 2"));
var_Items->set_ItemBold(h,true);
var_Items->set_ItemDivider(h,0);
Gantt1->EndUpdate();
|
|
795
|
How can I change the row's position to another, by drag and drop. Is it possible
Gantt1->BeginUpdate();
Gantt1->VisualAppearance->Add(1,TVariant("c:\\exontrol\\images\\normal.ebn"));
Gantt1->AutoDrag = Exganttlib_tlb::AutoDragEnum::exAutoDragPosition;
Gantt1->Columns->Add(L"Task");
Exganttlib_tlb::IChartPtr var_Chart = Gantt1->Chart;
var_Chart->ShowNonworkingDates = false;
var_Chart->set_FirstVisibleDate(TVariant(TDateTime(2000,12,29).operator double()));
var_Chart->set_PaneWidth(false,64);
var_Chart->LevelCount = 2;
var_Chart->Bars->get_Item(TVariant("Task"))->Color = 0x1000000;
Exganttlib_tlb::IItemsPtr var_Items = Gantt1->Items;
long h1 = var_Items->AddItem(TVariant("Task 1"));
var_Items->AddBar(h1,TVariant("Task"),TVariant(TDateTime(2001,1,2).operator double()),TVariant(TDateTime(2001,1,4).operator double()),TVariant("K1"),TNoParam());
long h2 = var_Items->AddItem(TVariant("Task 2"));
var_Items->AddBar(h2,TVariant("Task"),TVariant(TDateTime(2001,1,5).operator double()),TVariant(TDateTime(2001,1,7).operator double()),TVariant("K2"),TNoParam());
var_Items->AddLink(TVariant("L1"),h1,TVariant("K1"),h2,TVariant("K2"));
var_Items->set_Link(TVariant("L1"),Exganttlib_tlb::LinkPropertyEnum::exLinkText,TVariant("L1"));
long h3 = var_Items->AddItem(TVariant("Task 3"));
var_Items->AddBar(h3,TVariant("Task"),TVariant(TDateTime(2001,1,8).operator double()),TVariant(TDateTime(2001,1,10).operator double()),TVariant("K3"),TNoParam());
var_Items->AddLink(TVariant("L2"),h2,TVariant("K2"),h3,TVariant("K3"));
var_Items->set_Link(TVariant("L2"),Exganttlib_tlb::LinkPropertyEnum::exLinkText,TVariant("L2"));
Gantt1->EndUpdate();
|
|
794
|
Have seen the RenderType, but do not know what kind of values should I use
Gantt1->BeginUpdate();
Gantt1->VisualAppearance->Add(1,TVariant("c:\\exontrol\\images\\normal.ebn"));
Gantt1->Columns->Add(L"Task");
Gantt1->BackColorHeader = 0x1000000;
Exganttlib_tlb::IChartPtr var_Chart = Gantt1->Chart;
var_Chart->BackColorLevelHeader = 0x1000000;
var_Chart->set_FirstVisibleDate(TVariant(TDateTime(2000,12,29).operator double()));
var_Chart->set_PaneWidth(false,64);
var_Chart->LevelCount = 2;
var_Chart->Bars->get_Item(TVariant("Task"))->Color = 0x1000000;
Exganttlib_tlb::IItemsPtr var_Items = Gantt1->Items;
long h1 = var_Items->AddItem(TVariant("Task 1"));
var_Items->AddBar(h1,TVariant("Task"),TVariant(TDateTime(2001,1,2).operator double()),TVariant(TDateTime(2001,1,4).operator double()),TVariant("K1"),TNoParam());
long h2 = var_Items->AddItem(TVariant("Task 2"));
var_Items->AddBar(h2,TVariant("Task"),TVariant(TDateTime(2001,1,5).operator double()),TVariant(TDateTime(2001,1,7).operator double()),TVariant("K2"),TNoParam());
var_Items->AddLink(TVariant("L1"),h1,TVariant("K1"),h2,TVariant("K2"));
var_Items->set_Link(TVariant("L1"),Exganttlib_tlb::LinkPropertyEnum::exLinkText,TVariant("L1"));
long h3 = var_Items->AddItem(TVariant("Task 3"));
var_Items->AddBar(h3,TVariant("Task"),TVariant(TDateTime(2001,1,8).operator double()),TVariant(TDateTime(2001,1,10).operator double()),TVariant("K3"),TNoParam());
var_Items->AddLink(TVariant("L2"),h2,TVariant("K2"),h3,TVariant("K3"));
var_Items->set_Link(TVariant("L2"),Exganttlib_tlb::LinkPropertyEnum::exLinkText,TVariant("L2"));
Gantt1->VisualAppearance->RenderType = -2147483393;
Gantt1->EndUpdate();
|
|
793
|
I have several columns, but noticed that the filter is using AND between columns, but I need OR clause for filtering. Is it possible
Gantt1->BeginUpdate();
Gantt1->Chart->set_PaneWidth(true,0);
Gantt1->LinesAtRoot = Exganttlib_tlb::LinesAtRootEnum::exLinesAtRoot;
Exganttlib_tlb::IColumnPtr var_Column = Gantt1->Columns->Add(L"Item");
var_Column->DisplayFilterButton = true;
var_Column->DisplayFilterPattern = false;
var_Column->Filter = L"Child 1";
var_Column->FilterType = Exganttlib_tlb::FilterTypeEnum::exFilter;
Exganttlib_tlb::IColumnPtr var_Column1 = Gantt1->Columns->Add(L"Date");
var_Column1->DisplayFilterButton = true;
var_Column1->DisplayFilterPattern = false;
var_Column1->DisplayFilterDate = true;
var_Column1->FilterList = Exganttlib_tlb::FilterListEnum::exShowExclude | Exganttlib_tlb::FilterListEnum::exShowFocusItem | Exganttlib_tlb::FilterListEnum::exShowCheckBox | Exganttlib_tlb::FilterListEnum::exNoItems;
var_Column1->Filter = L"TDateTime(2010,12,28).operator double()";
var_Column1->FilterType = Exganttlib_tlb::FilterTypeEnum::exDate;
Gantt1->FilterCriteria = L"%0 or %1";
Gantt1->Description[Exganttlib_tlb::DescriptionTypeEnum::exFilterBarOr] = L"<font ;18><fgcolor=FF0000>or</fgcolor></font>";
Gantt1->Description[Exganttlib_tlb::DescriptionTypeEnum::exFilterBarAnd] = L"<font ;18><fgcolor=FF0000>and</fgcolor></font>";
Exganttlib_tlb::IItemsPtr var_Items = Gantt1->Items;
long h = var_Items->AddItem(TVariant("Root 1"));
var_Items->set_CellCaption(TVariant(var_Items->InsertItem(h,TNoParam(),TVariant("Child 1"))),TVariant(1),TVariant(TDateTime(2010,12,27).operator double()));
var_Items->set_CellCaption(TVariant(var_Items->InsertItem(h,TNoParam(),TVariant("Child 2"))),TVariant(1),TVariant(TDateTime(2010,12,28).operator double()));
var_Items->set_ExpandItem(h,true);
h = var_Items->AddItem(TVariant("Root 2"));
var_Items->set_CellCaption(TVariant(var_Items->InsertItem(h,TNoParam(),TVariant("Child 1"))),TVariant(1),TVariant(TDateTime(2010,12,29).operator double()));
var_Items->set_CellCaption(TVariant(var_Items->InsertItem(h,TNoParam(),TVariant("Child 2"))),TVariant(1),TVariant(TDateTime(2010,12,30).operator double()));
Gantt1->ApplyFilter();
Gantt1->EndUpdate();
|
|
792
|
Is it possible exclude the dates being selected in the drop down filter window
Gantt1->BeginUpdate();
Gantt1->Chart->set_PaneWidth(true,0);
Exganttlib_tlb::IColumnPtr var_Column = Gantt1->Columns->Add(L"Date");
var_Column->SortType = Exganttlib_tlb::SortTypeEnum::SortDate;
var_Column->DisplayFilterButton = true;
var_Column->DisplayFilterPattern = false;
var_Column->DisplayFilterDate = true;
var_Column->FilterList = Exganttlib_tlb::FilterListEnum::exShowExclude | Exganttlib_tlb::FilterListEnum::exShowFocusItem | Exganttlib_tlb::FilterListEnum::exShowCheckBox | Exganttlib_tlb::FilterListEnum::exNoItems;
Exganttlib_tlb::IItemsPtr var_Items = Gantt1->Items;
var_Items->AddItem(TVariant(TDateTime(2010,12,27).operator double()));
var_Items->AddItem(TVariant(TDateTime(2010,12,28).operator double()));
var_Items->AddItem(TVariant(TDateTime(2010,12,29).operator double()));
var_Items->AddItem(TVariant(TDateTime(2010,12,30).operator double()));
var_Items->AddItem(TVariant(TDateTime(2010,12,31).operator double()));
Gantt1->EndUpdate();
|
|
791
|
How can I display a calendar control inside the drop down filter window
Gantt1->BeginUpdate();
Gantt1->Chart->set_PaneWidth(true,0);
Exganttlib_tlb::IColumnPtr var_Column = Gantt1->Columns->Add(L"Date");
var_Column->SortType = Exganttlib_tlb::SortTypeEnum::SortDate;
var_Column->DisplayFilterButton = true;
var_Column->DisplayFilterPattern = false;
var_Column->DisplayFilterDate = true;
var_Column->FilterList = Exganttlib_tlb::FilterListEnum::exShowFocusItem | Exganttlib_tlb::FilterListEnum::exShowCheckBox | Exganttlib_tlb::FilterListEnum::exNoItems;
Exganttlib_tlb::IItemsPtr var_Items = Gantt1->Items;
var_Items->AddItem(TVariant(TDateTime(2010,12,27).operator double()));
var_Items->AddItem(TVariant(TDateTime(2010,12,28).operator double()));
var_Items->AddItem(TVariant(TDateTime(2010,12,29).operator double()));
var_Items->AddItem(TVariant(TDateTime(2010,12,30).operator double()));
var_Items->AddItem(TVariant(TDateTime(2010,12,31).operator double()));
Gantt1->EndUpdate();
|
|
790
|
Is it possible to include the dates as checkb-boxes in the drop down filter window
Gantt1->BeginUpdate();
Gantt1->Chart->set_PaneWidth(true,0);
Exganttlib_tlb::IColumnPtr var_Column = Gantt1->Columns->Add(L"Dates");
var_Column->SortType = Exganttlib_tlb::SortTypeEnum::SortDate;
var_Column->DisplayFilterButton = true;
var_Column->DisplayFilterPattern = true;
var_Column->DisplayFilterDate = true;
var_Column->FilterList = Exganttlib_tlb::FilterListEnum::exShowFocusItem | Exganttlib_tlb::FilterListEnum::exShowCheckBox;
var_Column->Filter = L"to 12/27/2010";
var_Column->FilterType = Exganttlib_tlb::FilterTypeEnum::exDate;
Exganttlib_tlb::IItemsPtr var_Items = Gantt1->Items;
var_Items->AddItem(TVariant(TDateTime(2010,12,27).operator double()));
var_Items->AddItem(TVariant(TDateTime(2010,12,28).operator double()));
var_Items->AddItem(TVariant(TDateTime(2010,12,29).operator double()));
var_Items->AddItem(TVariant(TDateTime(2010,12,30).operator double()));
var_Items->AddItem(TVariant(TDateTime(2010,12,31).operator double()));
Gantt1->ApplyFilter();
Gantt1->EndUpdate();
|
|
789
|
How can I filter items for dates before a specified date
Gantt1->BeginUpdate();
Gantt1->Chart->set_PaneWidth(true,0);
Exganttlib_tlb::IColumnPtr var_Column = Gantt1->Columns->Add(L"Dates");
var_Column->SortType = Exganttlib_tlb::SortTypeEnum::SortDate;
var_Column->DisplayFilterButton = true;
var_Column->DisplayFilterPattern = true;
var_Column->DisplayFilterDate = true;
var_Column->FilterList = Exganttlib_tlb::FilterListEnum::exShowFocusItem | Exganttlib_tlb::FilterListEnum::exNoItems;
var_Column->Filter = L"to 12/27/2010";
var_Column->FilterType = Exganttlib_tlb::FilterTypeEnum::exDate;
Exganttlib_tlb::IItemsPtr var_Items = Gantt1->Items;
var_Items->AddItem(TVariant(TDateTime(2010,12,27).operator double()));
var_Items->AddItem(TVariant(TDateTime(2010,12,28).operator double()));
var_Items->AddItem(TVariant(TDateTime(2010,12,29).operator double()));
var_Items->AddItem(TVariant(TDateTime(2010,12,30).operator double()));
var_Items->AddItem(TVariant(TDateTime(2010,12,31).operator double()));
Gantt1->ApplyFilter();
Gantt1->EndUpdate();
|
|
788
|
Is it possible to filter dates
Gantt1->BeginUpdate();
Gantt1->Chart->set_PaneWidth(true,0);
Exganttlib_tlb::IColumnPtr var_Column = Gantt1->Columns->Add(L"Dates");
var_Column->SortType = Exganttlib_tlb::SortTypeEnum::SortDate;
var_Column->DisplayFilterButton = true;
var_Column->DisplayFilterPattern = true;
var_Column->DisplayFilterDate = true;
var_Column->FilterList = Exganttlib_tlb::FilterListEnum::exShowFocusItem | Exganttlib_tlb::FilterListEnum::exNoItems;
Exganttlib_tlb::IItemsPtr var_Items = Gantt1->Items;
var_Items->AddItem(TVariant(TDateTime(2010,12,27).operator double()));
var_Items->AddItem(TVariant(TDateTime(2010,12,28).operator double()));
var_Items->AddItem(TVariant(TDateTime(2010,12,29).operator double()));
var_Items->AddItem(TVariant(TDateTime(2010,12,30).operator double()));
var_Items->AddItem(TVariant(TDateTime(2010,12,31).operator double()));
Gantt1->EndUpdate();
|
|
787
|
Is it possible to change the Exclude field name to something different, in the drop down filter window
Gantt1->BeginUpdate();
Gantt1->Chart->set_PaneWidth(true,0);
Gantt1->LinesAtRoot = Exganttlib_tlb::LinesAtRootEnum::exLinesAtRoot;
Gantt1->Description[Exganttlib_tlb::DescriptionTypeEnum::exFilterBarExclude] = L"Leaving out";
Exganttlib_tlb::IColumnPtr var_Column = Gantt1->Columns->Add(L"Items");
var_Column->DisplayFilterButton = true;
var_Column->DisplayFilterPattern = false;
var_Column->FilterList = Exganttlib_tlb::FilterListEnum::exShowExclude | Exganttlib_tlb::FilterListEnum::exShowFocusItem | Exganttlib_tlb::FilterListEnum::exShowCheckBox;
Exganttlib_tlb::IItemsPtr var_Items = Gantt1->Items;
long h = var_Items->AddItem(TVariant("Root 1"));
var_Items->InsertItem(h,TNoParam(),TVariant("Child 1"));
var_Items->InsertItem(h,TNoParam(),TVariant("Child 2"));
var_Items->set_ExpandItem(h,true);
h = var_Items->AddItem(TVariant("Root 2"));
var_Items->InsertItem(h,TNoParam(),TVariant("Child 1"));
Gantt1->EndUpdate();
|
|
786
|
How can I display the Exclude field in the drop down filter window
Gantt1->BeginUpdate();
Gantt1->Chart->set_PaneWidth(true,0);
Gantt1->LinesAtRoot = Exganttlib_tlb::LinesAtRootEnum::exLinesAtRoot;
Exganttlib_tlb::IColumnPtr var_Column = Gantt1->Columns->Add(L"Items");
var_Column->DisplayFilterButton = true;
var_Column->DisplayFilterPattern = false;
var_Column->FilterList = Exganttlib_tlb::FilterListEnum::exShowExclude | Exganttlib_tlb::FilterListEnum::exShowFocusItem | Exganttlib_tlb::FilterListEnum::exShowCheckBox;
Exganttlib_tlb::IItemsPtr var_Items = Gantt1->Items;
long h = var_Items->AddItem(TVariant("Root 1"));
var_Items->InsertItem(h,TNoParam(),TVariant("Child 1"));
var_Items->InsertItem(h,TNoParam(),TVariant("Child 2"));
var_Items->set_ExpandItem(h,true);
h = var_Items->AddItem(TVariant("Root 2"));
var_Items->InsertItem(h,TNoParam(),TVariant("Child 1"));
Gantt1->EndUpdate();
|
|
785
|
Is it possible to show and ensure the focused item from the control, in the drop down filter window
Gantt1->BeginUpdate();
Gantt1->Chart->set_PaneWidth(true,0);
Gantt1->LinesAtRoot = Exganttlib_tlb::LinesAtRootEnum::exLinesAtRoot;
Exganttlib_tlb::IColumnPtr var_Column = Gantt1->Columns->Add(L"Items");
var_Column->DisplayFilterButton = true;
var_Column->DisplayFilterPattern = false;
var_Column->FilterList = Exganttlib_tlb::FilterListEnum::exShowFocusItem | Exganttlib_tlb::FilterListEnum::exShowCheckBox;
Exganttlib_tlb::IItemsPtr var_Items = Gantt1->Items;
long h = var_Items->AddItem(TVariant("Root 1"));
var_Items->InsertItem(h,TNoParam(),TVariant("Child 1"));
var_Items->InsertItem(h,TNoParam(),TVariant("Child 2"));
var_Items->set_ExpandItem(h,true);
h = var_Items->AddItem(TVariant("Root 2"));
var_Items->InsertItem(h,TNoParam(),TVariant("Child 1"));
var_Items->set_SelectItem(var_Items->InsertItem(h,TNoParam(),TVariant("Child 2")),true);
var_Items->set_ExpandItem(h,true);
Gantt1->EndUpdate();
|
|
784
|
Is it possible to show only blanks items with no listed items from the control
Gantt1->BeginUpdate();
Gantt1->Chart->set_PaneWidth(true,0);
Gantt1->LinesAtRoot = Exganttlib_tlb::LinesAtRootEnum::exLinesAtRoot;
Exganttlib_tlb::IColumnPtr var_Column = Gantt1->Columns->Add(L"Items");
var_Column->DisplayFilterButton = true;
var_Column->DisplayFilterPattern = false;
var_Column->FilterList = Exganttlib_tlb::FilterListEnum::exShowBlanks | Exganttlib_tlb::FilterListEnum::exNoItems;
Exganttlib_tlb::IItemsPtr var_Items = Gantt1->Items;
long h = var_Items->AddItem(TVariant("Root 1"));
var_Items->InsertItem(h,TNoParam(),TVariant("Child 1"));
var_Items->InsertItem(h,TNoParam(),TVariant("Child 2"));
var_Items->set_ExpandItem(h,true);
h = var_Items->AddItem(TVariant("Root 2"));
var_Items->InsertItem(h,TNoParam(),TVariant("Child 1"));
var_Items->InsertItem(h,TNoParam(),TVariant("Child 2"));
Gantt1->EndUpdate();
|
|
783
|
How can I include the blanks items in the drop down filter window
Gantt1->BeginUpdate();
Gantt1->Chart->set_PaneWidth(true,0);
Gantt1->LinesAtRoot = Exganttlib_tlb::LinesAtRootEnum::exLinesAtRoot;
Exganttlib_tlb::IColumnPtr var_Column = Gantt1->Columns->Add(L"Items");
var_Column->DisplayFilterButton = true;
var_Column->DisplayFilterPattern = false;
var_Column->FilterList = Exganttlib_tlb::FilterListEnum::exShowBlanks | Exganttlib_tlb::FilterListEnum::exShowCheckBox;
Exganttlib_tlb::IItemsPtr var_Items = Gantt1->Items;
long h = var_Items->AddItem(TVariant("Root 1"));
var_Items->InsertItem(h,TNoParam(),TVariant("Child 1"));
var_Items->InsertItem(h,TNoParam(),TVariant("Child 2"));
var_Items->set_ExpandItem(h,true);
h = var_Items->AddItem(TVariant("Root 2"));
var_Items->InsertItem(h,TNoParam(),TVariant("Child 1"));
var_Items->InsertItem(h,TNoParam(),TVariant("Child 2"));
Gantt1->EndUpdate();
|
|
782
|
How can I select multiple items in the drop down filter window, using check-boxes
Gantt1->BeginUpdate();
Gantt1->Chart->set_PaneWidth(true,0);
Gantt1->LinesAtRoot = Exganttlib_tlb::LinesAtRootEnum::exLinesAtRoot;
Exganttlib_tlb::IColumnPtr var_Column = Gantt1->Columns->Add(L"Items");
var_Column->DisplayFilterButton = true;
var_Column->DisplayFilterPattern = false;
var_Column->FilterList = Exganttlib_tlb::FilterListEnum::exShowCheckBox;
Exganttlib_tlb::IItemsPtr var_Items = Gantt1->Items;
long h = var_Items->AddItem(TVariant("Root 1"));
var_Items->InsertItem(h,TNoParam(),TVariant("Child 1"));
var_Items->InsertItem(h,TNoParam(),TVariant("Child 2"));
var_Items->set_ExpandItem(h,true);
h = var_Items->AddItem(TVariant("Root 2"));
var_Items->InsertItem(h,TNoParam(),TVariant("Child 1"));
var_Items->InsertItem(h,TNoParam(),TVariant("Child 2"));
Gantt1->EndUpdate();
|
|
781
|
Is it possible to allow a single item being selected in the drop down filter window
Gantt1->BeginUpdate();
Gantt1->Chart->set_PaneWidth(true,0);
Gantt1->LinesAtRoot = Exganttlib_tlb::LinesAtRootEnum::exLinesAtRoot;
Exganttlib_tlb::IColumnPtr var_Column = Gantt1->Columns->Add(L"Items");
var_Column->DisplayFilterButton = true;
var_Column->DisplayFilterPattern = false;
var_Column->FilterList = Exganttlib_tlb::FilterListEnum::exSingleSel;
Exganttlib_tlb::IItemsPtr var_Items = Gantt1->Items;
long h = var_Items->AddItem(TVariant("Root 1"));
var_Items->InsertItem(h,TNoParam(),TVariant("Child 1"));
var_Items->InsertItem(h,TNoParam(),TVariant("Child 2"));
var_Items->set_ExpandItem(h,true);
h = var_Items->AddItem(TVariant("Root 2"));
var_Items->InsertItem(h,TNoParam(),TVariant("Child 1"));
var_Items->InsertItem(h,TNoParam(),TVariant("Child 2"));
Gantt1->EndUpdate();
|
|
780
|
How can I display no (All) item in the drop down filter window
Gantt1->BeginUpdate();
Gantt1->Chart->set_PaneWidth(true,0);
Gantt1->LinesAtRoot = Exganttlib_tlb::LinesAtRootEnum::exLinesAtRoot;
Gantt1->Description[Exganttlib_tlb::DescriptionTypeEnum::exFilterBarAll] = L"";
Exganttlib_tlb::IColumnPtr var_Column = Gantt1->Columns->Add(L"Items");
var_Column->DisplayFilterButton = true;
var_Column->DisplayFilterPattern = true;
var_Column->FilterList = Exganttlib_tlb::FilterListEnum::exNoItems;
Exganttlib_tlb::IItemsPtr var_Items = Gantt1->Items;
long h = var_Items->AddItem(TVariant("Root 1"));
var_Items->InsertItem(h,TNoParam(),TVariant("Child 1"));
var_Items->InsertItem(h,TNoParam(),TVariant("Child 2"));
var_Items->set_ExpandItem(h,true);
h = var_Items->AddItem(TVariant("Root 2"));
var_Items->InsertItem(h,TNoParam(),TVariant("Child 1"));
var_Items->InsertItem(h,TNoParam(),TVariant("Child 2"));
Gantt1->EndUpdate();
|
|
779
|
Is it possible to display no items in the drop down filter window, so only the pattern is visible
Gantt1->BeginUpdate();
Gantt1->Chart->set_PaneWidth(true,0);
Gantt1->LinesAtRoot = Exganttlib_tlb::LinesAtRootEnum::exLinesAtRoot;
Exganttlib_tlb::IColumnPtr var_Column = Gantt1->Columns->Add(L"Items");
var_Column->DisplayFilterButton = true;
var_Column->DisplayFilterPattern = true;
var_Column->FilterList = Exganttlib_tlb::FilterListEnum::exNoItems;
Exganttlib_tlb::IItemsPtr var_Items = Gantt1->Items;
long h = var_Items->AddItem(TVariant("Root 1"));
var_Items->InsertItem(h,TNoParam(),TVariant("Child 1"));
var_Items->InsertItem(h,TNoParam(),TVariant("Child 2"));
var_Items->set_ExpandItem(h,true);
h = var_Items->AddItem(TVariant("Root 2"));
var_Items->InsertItem(h,TNoParam(),TVariant("Child 1"));
var_Items->InsertItem(h,TNoParam(),TVariant("Child 2"));
Gantt1->EndUpdate();
|
|
778
|
How can I show the child items with no identation
Gantt1->LinesAtRoot = Exganttlib_tlb::LinesAtRootEnum::exGroupLinesOutside;
Gantt1->Indent = 12;
Gantt1->HasLines = Exganttlib_tlb::HierarchyLineEnum::exThinLine;
Gantt1->Columns->Add(L"Default");
Exganttlib_tlb::IItemsPtr var_Items = Gantt1->Items;
long h = var_Items->AddItem(TVariant("Root 1"));
var_Items->InsertItem(h,TNoParam(),TVariant("Child 1"));
var_Items->InsertItem(h,TNoParam(),TVariant("Child 2"));
var_Items->InsertItem(h,TNoParam(),TVariant("Child 3"));
var_Items->set_ExpandItem(h,true);
h = var_Items->AddItem(TVariant("Root 2"));
var_Items->InsertItem(h,TNoParam(),TVariant("Child 1"));
var_Items->InsertItem(h,TNoParam(),TVariant("Child 2"));
var_Items->InsertItem(h,TNoParam(),TVariant("Child 3"));
|
|
777
|
Is there other ways of showing the hierarchy lines (exGroupLinesAtRoot)
Gantt1->LinesAtRoot = Exganttlib_tlb::LinesAtRootEnum::exGroupLinesAtRoot;
Gantt1->Indent = 12;
Gantt1->Columns->Add(L"Default");
Exganttlib_tlb::IItemsPtr var_Items = Gantt1->Items;
long h = var_Items->AddItem(TVariant("Root"));
var_Items->InsertItem(h,TNoParam(),TVariant("Child 1"));
var_Items->InsertItem(h,TNoParam(),TVariant("Child 2"));
var_Items->InsertItem(h,TNoParam(),TVariant("Child 3"));
var_Items->set_ExpandItem(h,true);
|
|
776
|
Is there other ways of showing the hierarchy lines (exGroupLinesOutside)
Gantt1->LinesAtRoot = Exganttlib_tlb::LinesAtRootEnum::exGroupLinesOutside;
Gantt1->Indent = 12;
Gantt1->Columns->Add(L"Default");
Exganttlib_tlb::IItemsPtr var_Items = Gantt1->Items;
long h = var_Items->AddItem(TVariant("Root 1"));
var_Items->InsertItem(h,TNoParam(),TVariant("Child 1"));
var_Items->InsertItem(h,TNoParam(),TVariant("Child 2"));
var_Items->InsertItem(h,TNoParam(),TVariant("Child 3"));
var_Items->set_ExpandItem(h,true);
h = var_Items->AddItem(TVariant("Root 2"));
var_Items->InsertItem(h,TNoParam(),TVariant("Child 1"));
var_Items->InsertItem(h,TNoParam(),TVariant("Child 2"));
var_Items->InsertItem(h,TNoParam(),TVariant("Child 3"));
|
|
775
|
Is there other ways of showing the hierarchy lines (exGroupLinesInsideLeaf)
Gantt1->LinesAtRoot = Exganttlib_tlb::LinesAtRootEnum::exGroupLinesInsideLeaf;
Gantt1->Indent = 12;
Gantt1->Columns->Add(L"Default");
Exganttlib_tlb::IItemsPtr var_Items = Gantt1->Items;
long h = var_Items->AddItem(TVariant("Root"));
var_Items->InsertItem(h,TNoParam(),TVariant("Child 1"));
var_Items->InsertItem(h,TNoParam(),TVariant("Child 2"));
var_Items->InsertItem(h,TNoParam(),TVariant("Child 3"));
var_Items->set_ExpandItem(h,true);
|
|
774
|
Is there other ways of showing the hierarchy lines (exGroupLinesInside)
Gantt1->LinesAtRoot = Exganttlib_tlb::LinesAtRootEnum::exGroupLinesInside;
Gantt1->Indent = 12;
Gantt1->Columns->Add(L"Default");
Exganttlib_tlb::IItemsPtr var_Items = Gantt1->Items;
long h = var_Items->AddItem(TVariant("Root"));
var_Items->InsertItem(h,TNoParam(),TVariant("Child 1"));
var_Items->InsertItem(h,TNoParam(),TVariant("Child 2"));
var_Items->InsertItem(h,TNoParam(),TVariant("Child 3"));
var_Items->set_ExpandItem(h,true);
|
|
773
|
Is there other ways of showing the hierarchy lines (exGroupLines)
Gantt1->LinesAtRoot = Exganttlib_tlb::LinesAtRootEnum::exGroupLines;
Gantt1->Indent = 12;
Gantt1->Columns->Add(L"Default");
Exganttlib_tlb::IItemsPtr var_Items = Gantt1->Items;
long h = var_Items->AddItem(TVariant("Root"));
var_Items->InsertItem(h,TNoParam(),TVariant("Child 1"));
var_Items->InsertItem(var_Items->InsertItem(h,TNoParam(),TVariant("Child 2")),TNoParam(),TVariant("SubChild 2"));
var_Items->InsertItem(h,TNoParam(),TVariant("Child 3"));
var_Items->set_ExpandItem(h,true);
|
|
772
|
Is it possible background color displayed when the mouse passes over an item
Gantt1->BeginUpdate();
Gantt1->Columns->Add(L"Def");
Gantt1->HotBackColor = RGB(0,0,128);
Gantt1->HotForeColor = RGB(255,255,255);
Exganttlib_tlb::IItemsPtr var_Items = Gantt1->Items;
var_Items->AddItem(TVariant("Item A"));
var_Items->AddItem(TVariant("Item B"));
var_Items->AddItem(TVariant("Item C"));
Gantt1->EndUpdate();
|
|
771
|
How can I simulate displaying groups
Gantt1->HasLines = Exganttlib_tlb::HierarchyLineEnum::exNoLine;
Gantt1->ScrollBySingleLine = true;
Gantt1->Chart->set_PaneWidth(true,0);
Exganttlib_tlb::IColumnsPtr var_Columns = Gantt1->Columns;
var_Columns->Add(L"Name");
var_Columns->Add(L"A");
var_Columns->Add(L"B");
var_Columns->Add(L"C");
Exganttlib_tlb::IItemsPtr var_Items = Gantt1->Items;
long h = var_Items->AddItem(TVariant("Group 1"));
var_Items->set_CellHAlignment(TVariant(h),TVariant(0),Exganttlib_tlb::AlignmentEnum::CenterAlignment);
var_Items->set_ItemDivider(h,0);
var_Items->set_ItemDividerLineAlignment(h,Exganttlib_tlb::DividerAlignmentEnum::DividerBoth);
var_Items->set_ItemHeight(h,24);
var_Items->set_SortableItem(h,false);
long h1 = var_Items->InsertItem(h,TNoParam(),TVariant("Child 1"));
var_Items->set_CellCaption(TVariant(h1),TVariant(1),TVariant(1));
var_Items->set_CellCaption(TVariant(h1),TVariant(2),TVariant(2));
var_Items->set_CellCaption(TVariant(h1),TVariant(3),TVariant(3));
h1 = var_Items->InsertItem(h,TNoParam(),TVariant("Child 2"));
var_Items->set_CellCaption(TVariant(h1),TVariant(1),TVariant(4));
var_Items->set_CellCaption(TVariant(h1),TVariant(2),TVariant(5));
var_Items->set_CellCaption(TVariant(h1),TVariant(3),TVariant(6));
var_Items->set_ExpandItem(h,true);
h = var_Items->AddItem(TVariant("Group 2"));
var_Items->set_CellHAlignment(TVariant(h),TVariant(0),Exganttlib_tlb::AlignmentEnum::CenterAlignment);
var_Items->set_ItemDivider(h,0);
var_Items->set_ItemDividerLineAlignment(h,Exganttlib_tlb::DividerAlignmentEnum::DividerBoth);
var_Items->set_ItemHeight(h,24);
var_Items->set_SortableItem(h,false);
h1 = var_Items->InsertItem(h,TNoParam(),TVariant("Child 1"));
var_Items->set_CellCaption(TVariant(h1),TVariant(1),TVariant(1));
var_Items->set_CellCaption(TVariant(h1),TVariant(2),TVariant(2));
var_Items->set_CellCaption(TVariant(h1),TVariant(3),TVariant(3));
h1 = var_Items->InsertItem(h,TNoParam(),TVariant("Child 2"));
var_Items->set_CellCaption(TVariant(h1),TVariant(1),TVariant(4));
var_Items->set_CellCaption(TVariant(h1),TVariant(2),TVariant(5));
var_Items->set_CellCaption(TVariant(h1),TVariant(3),TVariant(6));
var_Items->set_ExpandItem(h,true);
|
|
770
|
Is it possible to change the height for all items at once
Gantt1->BeginUpdate();
Gantt1->LinesAtRoot = Exganttlib_tlb::LinesAtRootEnum::exLinesAtRoot;
Gantt1->Columns->Add(L"Items");
Exganttlib_tlb::IItemsPtr var_Items = Gantt1->Items;
long h = var_Items->AddItem(TVariant("Root 1"));
var_Items->InsertItem(h,TNoParam(),TVariant("Child 1"));
var_Items->InsertItem(h,TNoParam(),TVariant("Child 2"));
h = var_Items->AddItem(TVariant("Root 2"));
var_Items->InsertItem(h,TNoParam(),TVariant("Child 1"));
var_Items->InsertItem(h,TNoParam(),TVariant("Child 2"));
var_Items->set_ExpandItem(0,true);
Gantt1->EndUpdate();
Gantt1->DefaultItemHeight = 12;
Gantt1->Items->set_ItemHeight(0,12);
|
|
769
|
Is it possible to specify the cell's value but still want to display some formatted text instead the value
Gantt1->BeginUpdate();
Gantt1->Chart->set_PaneWidth(true,0);
Gantt1->Columns->Add(L"Value");
Gantt1->Columns->Add(L"FormatCell");
Exganttlib_tlb::IItemsPtr var_Items = Gantt1->Items;
long h = var_Items->AddItem(TVariant(1));
var_Items->set_CellCaption(TVariant(h),TVariant(1),TVariant(12));
var_Items->set_FormatCell(TVariant(h),TVariant(1),L"currency(value)");
h = var_Items->AddItem(TVariant(TDateTime(2001,1,1).operator double()));
var_Items->set_CellCaption(TVariant(h),TVariant(1),TVariant(TDateTime(2001,1,1).operator double()));
var_Items->set_CellCaptionFormat(TVariant(h),TVariant(1),Exganttlib_tlb::CaptionFormatEnum::exHTML);
var_Items->set_FormatCell(TVariant(h),TVariant(1),L"longdate(value) replace '2001' with '<b>2001</b>'");
Gantt1->EndUpdate();
|
|
768
|
Is it possible to specify the cell's value but still want to display some formatted text instead the value
Gantt1->BeginUpdate();
Gantt1->Chart->set_PaneWidth(true,0);
Gantt1->MarkSearchColumn = false;
Exganttlib_tlb::IColumnsPtr var_Columns = Gantt1->Columns;
var_Columns->Add(L"Name");
Exganttlib_tlb::IColumnPtr var_Column = var_Columns->Add(L"Values");
var_Column->SortType = Exganttlib_tlb::SortTypeEnum::SortNumeric;
var_Column->AllowSizing = false;
var_Column->Width = 64;
var_Column->FormatColumn = L"((0:=dbl(value)) < 10? '<fgcolor=808080><font ;7>' :'<b>') + currency(=:0)";
var_Column->set_Def(Exganttlib_tlb::DefColumnEnum::exCellCaptionFormat,TVariant(1));
Exganttlib_tlb::IItemsPtr var_Items = Gantt1->Items;
long h = var_Items->AddItem(TVariant("Root"));
var_Items->set_FormatCell(TVariant(h),TVariant(1),L"'<none>'");
var_Items->set_CellCaption(TVariant(var_Items->InsertItem(h,TNoParam(),TVariant("Child 1"))),TVariant(1),TVariant(10));
var_Items->set_CellCaption(TVariant(var_Items->InsertItem(h,TNoParam(),TVariant("Child 2"))),TVariant(1),TVariant(15));
var_Items->set_CellCaption(TVariant(var_Items->InsertItem(h,TNoParam(),TVariant("Child 3"))),TVariant(1),TVariant(25));
var_Items->set_ExpandItem(h,true);
Gantt1->EndUpdate();
|
|
767
|
I am using the FormatColumn to display the current currency, but would like hide some values. Is it possible
Gantt1->BeginUpdate();
Gantt1->Chart->set_PaneWidth(true,0);
Gantt1->MarkSearchColumn = false;
Exganttlib_tlb::IColumnsPtr var_Columns = Gantt1->Columns;
var_Columns->Add(L"Name");
Exganttlib_tlb::IColumnPtr var_Column = var_Columns->Add(L"Values");
var_Column->SortType = Exganttlib_tlb::SortTypeEnum::SortNumeric;
var_Column->AllowSizing = false;
var_Column->Width = 64;
var_Column->FormatColumn = L"((0:=dbl(value)) < 10? '<fgcolor=808080><font ;7>' :'<b>') + currency(=:0)";
var_Column->set_Def(Exganttlib_tlb::DefColumnEnum::exCellCaptionFormat,TVariant(1));
Exganttlib_tlb::IItemsPtr var_Items = Gantt1->Items;
long h = var_Items->AddItem(TVariant("Root"));
var_Items->set_FormatCell(TVariant(h),TVariant(1),L" ");
var_Items->set_CellCaption(TVariant(var_Items->InsertItem(h,TNoParam(),TVariant("Child 1"))),TVariant(1),TVariant(10));
var_Items->set_CellCaption(TVariant(var_Items->InsertItem(h,TNoParam(),TVariant("Child 2"))),TVariant(1),TVariant(15));
var_Items->set_CellCaption(TVariant(var_Items->InsertItem(h,TNoParam(),TVariant("Child 3"))),TVariant(1),TVariant(25));
var_Items->set_ExpandItem(h,true);
Gantt1->EndUpdate();
|
|
766
|
How can I apply the same ConditionalFormat on more than 1(one) column (multiple columns and not on item)
Gantt1->BeginUpdate();
Exganttlib_tlb::IConditionalFormatPtr var_ConditionalFormat = Gantt1->ConditionalFormats->Add(L"1",TVariant("K1"));
var_ConditionalFormat->BackColor = RGB(255,0,0);
var_ConditionalFormat->ApplyTo = Exganttlib_tlb::FormatApplyToEnum(0x1);
Exganttlib_tlb::IConditionalFormatPtr var_ConditionalFormat1 = Gantt1->ConditionalFormats->Add(L"1",TVariant("K2"));
var_ConditionalFormat1->BackColor = RGB(255,0,0);
var_ConditionalFormat1->ApplyTo = Exganttlib_tlb::FormatApplyToEnum(0x2);
Gantt1->MarkSearchColumn = false;
Gantt1->DrawGridLines = Exganttlib_tlb::GridLinesEnum::exRowLines;
Exganttlib_tlb::IColumnsPtr var_Columns = Gantt1->Columns;
var_Columns->Add(L"Column 1");
var_Columns->Add(L"Column 2");
var_Columns->Add(L"Column 3");
Exganttlib_tlb::IItemsPtr var_Items = Gantt1->Items;
var_Items->AddItem(TNoParam());
var_Items->AddItem(TNoParam());
var_Items->AddItem(TNoParam());
Gantt1->EndUpdate();
|
|
765
|
How can I get the list of items as they are displayed
Gantt1->BeginUpdate();
Gantt1->BackColorAlternate = RGB(240,240,240);
Gantt1->Columns->Add(L"Names");
Exganttlib_tlb::IItemsPtr var_Items = Gantt1->Items;
var_Items->AddItem(TVariant("Mantel"));
var_Items->AddItem(TVariant("Mechanik"));
var_Items->AddItem(TVariant("Motor"));
var_Items->AddItem(TVariant("Murks"));
var_Items->AddItem(TVariant("Märchen"));
var_Items->AddItem(TVariant("Möhren"));
var_Items->AddItem(TVariant("Mühle"));
Gantt1->Columns->get_Item(TVariant(0))->SortOrder = Exganttlib_tlb::SortOrderEnum::SortAscending;
Gantt1->EndUpdate();
OutputDebugString( PChar(Gantt1->GetItems(TVariant(1))) );
|
|
764
|
Is posible to reduce the size of the picture to be shown in the column's caption
Gantt1->BeginUpdate();
Gantt1->HTMLPicture[L"pic1"] = TVariant("c:\\exontrol\\images\\zipdisk.gif");
Gantt1->HeaderHeight = 48;
Gantt1->Columns->Add(L"DefaultSize")->HTMLCaption = L"Default-Size <img>pic1</img> Picture";
Gantt1->Columns->Add(L"CustomSize")->HTMLCaption = L"Custom-Size <img>pic1:16</img> Picture";
Gantt1->EndUpdate();
|
|
763
|
How can I change the color, font, bold etc for the items/cells in the same column or for the entire column
Gantt1->BeginUpdate();
Gantt1->MarkSearchColumn = false;
Exganttlib_tlb::IConditionalFormatPtr var_ConditionalFormat = Gantt1->ConditionalFormats->Add(L"1",TNoParam());
var_ConditionalFormat->Bold = true;
var_ConditionalFormat->ForeColor = RGB(255,0,0);
var_ConditionalFormat->ApplyTo = Exganttlib_tlb::FormatApplyToEnum(0x1);
Gantt1->Columns->Add(L"C1");
Exganttlib_tlb::IColumnPtr var_Column = Gantt1->Columns->Add(L"C2");
var_Column->HeaderBold = true;
var_Column->HTMLCaption = L"<fgcolor=FF0000>C2";
Exganttlib_tlb::IItemsPtr var_Items = Gantt1->Items;
var_Items->set_CellCaption(TVariant(var_Items->AddItem(TVariant(10))),TVariant(1),TVariant(11));
var_Items->set_CellCaption(TVariant(var_Items->AddItem(TVariant(12))),TVariant(1),TVariant(13));
Gantt1->EndUpdate();
|
|
762
|
The item is not getting selected when clicking the cell's checkbox. What should I do
// CellStateChanged event - Fired after cell's state has been changed.
void __fastcall TForm1::Gantt1CellStateChanged(TObject *Sender,Exganttlib_tlb::HITEM Item,long ColIndex)
{
Gantt1->Items->set_SelectItem(Item,true);
}
Gantt1->Columns->Add(L"Check")->set_Def(Exganttlib_tlb::DefColumnEnum::exCellHasCheckBox,TVariant(true));
Exganttlib_tlb::IItemsPtr var_Items = Gantt1->Items;
var_Items->AddItem(TVariant(0));
var_Items->AddItem(TVariant(1));
var_Items->AddItem(TVariant(2));
var_Items->AddItem(TVariant(3));
|
|
761
|
Is it possible to limit the height of the item while resizing
// AddItem event - Occurs after a new Item has been inserted to Items collection.
void __fastcall TForm1::Gantt1AddItem(TObject *Sender,Exganttlib_tlb::HITEM Item)
{
Gantt1->Items->set_ItemMinHeight(Item,18);
Gantt1->Items->set_ItemMaxHeight(Item,72);
}
Gantt1->BeginUpdate();
Gantt1->ItemsAllowSizing = Exganttlib_tlb::ItemsAllowSizingEnum::exResizeItem;
Gantt1->ScrollBySingleLine = false;
Gantt1->BackColorAlternate = RGB(240,240,240);
Gantt1->Columns->Add(L"Names");
Exganttlib_tlb::IItemsPtr var_Items = Gantt1->Items;
var_Items->AddItem(TVariant("Mantel"));
var_Items->AddItem(TVariant("Mechanik"));
var_Items->AddItem(TVariant("Motor"));
var_Items->AddItem(TVariant("Murks"));
var_Items->AddItem(TVariant("Märchen"));
var_Items->AddItem(TVariant("Möhren"));
var_Items->AddItem(TVariant("Mühle"));
Gantt1->Columns->get_Item(TVariant(0))->SortOrder = Exganttlib_tlb::SortOrderEnum::SortAscending;
Gantt1->EndUpdate();
|
|
760
|
Is it possible to copy the hierarchy of the control using the GetItems method
Gantt1->LinesAtRoot = Exganttlib_tlb::LinesAtRootEnum::exLinesAtRoot;
Gantt1->Columns->Add(L"Def");
Exganttlib_tlb::IItemsPtr var_Items = Gantt1->Items;
long h = var_Items->AddItem(TVariant("Root"));
var_Items->InsertItem(h,TNoParam(),TVariant("Child 1"));
var_Items->InsertItem(h,TNoParam(),TVariant("Child 2"));
Gantt1->PutItems(Gantt1->GetItems(TVariant(-1)),TNoParam());
|
|
759
|
Does your control supports multiple lines tooltip
Gantt1->HTMLPicture[L"pic1"] = TVariant("c:\\exontrol\\images\\zipdisk.gif");
Gantt1->ToolTipDelay = 1;
Gantt1->Columns->Add(L"tootip")->ToolTip = TVariant(String("<br><font Tahoma;10>This</font> is a <b>multi-lines</b> tooltip assigned to a column. The tooltip supports built-in HTML tags, ") +
"icons and pictures.<br><br><br><img>pic1</img> picture ... <br><br>");
|
|
758
|
It is possible to write the word in red/color or to add a tooltip or a link to the word
Gantt1->Columns->Add(L"Task");
Exganttlib_tlb::IChartPtr var_Chart = Gantt1->Chart;
var_Chart->LevelCount = 2;
var_Chart->set_FirstVisibleDate(TVariant(TDateTime(2000,12,26).operator double()));
var_Chart->set_PaneWidth(false,32);
Exganttlib_tlb::IItemsPtr var_Items = Gantt1->Items;
long h1 = var_Items->AddItem(TVariant("Task 1"));
var_Items->AddBar(h1,TVariant(""),TVariant(TDateTime(2001,1,1).operator double()),TVariant(TDateTime(2001,1,5).operator double()),TVariant("K1"),TVariant("some <fgcolor=FF0000>red</fgcolor> text"));
var_Items->set_ItemBar(h1,TVariant("K1"),Exganttlib_tlb::ItemBarPropertyEnum::exBarPercent,TVariant(false));
var_Items->set_ItemBar(h1,TVariant("K1"),Exganttlib_tlb::ItemBarPropertyEnum::exBarToolTip,TVariant("And here goes the <b>tooltip</b> of the text. "));
var_Items->AddItem(TVariant(""));
var_Items->AddItem(TVariant(""));
var_Items->AddItem(TVariant(""));
var_Items->AddItem(TVariant(""));
long h2 = var_Items->AddItem(TVariant("Task 2"));
var_Items->AddBar(h2,TVariant("Task"),TVariant(TDateTime(2001,1,5).operator double()),TVariant(TDateTime(2001,1,7).operator double()),TVariant("K2"),TNoParam());
var_Items->set_ItemBar(h2,TVariant("K2"),Exganttlib_tlb::ItemBarPropertyEnum::exBarToolTip,TVariant("And here goes the <b>tooltip</b> of the bar. "));
var_Items->AddLink(TVariant("L1"),h1,TVariant("K1"),h2,TVariant("K2"));
var_Items->set_Link(TVariant("L1"),Exganttlib_tlb::LinkPropertyEnum::exLinkText,TVariant("L<b>inke</b>d to a bar"));
var_Items->set_Link(TVariant("L1"),Exganttlib_tlb::LinkPropertyEnum::exLinkToolTip,TVariant("And here goes the <b>tooltip</b> of the link. "));
|
|
757
|
It is possible to use seconds/minutes/hours as time scale in your control, but using my regional settings
Gantt1->BeginUpdate();
Exganttlib_tlb::IChartPtr var_Chart = Gantt1->Chart;
var_Chart->set_Label(Exganttlib_tlb::UnitEnum::exMonth,L"<|><%loc_m1%><|><%loc_m2%><|><%loc_m3%><|><%loc_mmmm%><|><%loc_m3%> '<%yy%><|><%loc_mmmm%> <%yyyy%>");
var_Chart->set_Label(Exganttlib_tlb::UnitEnum::exWeek,L"<|><%ww%><|><%loc_m3%> <%d%>, '<%yy%><r><%ww%><|><%loc_mmmm%> <%d%>, <%yyyy%><r><%ww%><||><||>256");
var_Chart->set_Label(Exganttlib_tlb::UnitEnum::exDay,TVariant(String("<|><%loc_d1%><|><%loc_d2%><|><%loc_d3%><|><%loc_dddd%><|><%loc_d3%>, <%loc_m3%> <%d%>, '<%yy%><|><%loc_dddd%>, <%loc_mmmm%> <%d") +
"%>, <%yyyy%><||><||>4096"));
var_Chart->set_Label(Exganttlib_tlb::UnitEnum::exHour,TVariant(String("<|><%hh%><|><%h%> <%AM/PM%><|><%loc_d3%>, <%loc_m3%> <%d%>, '<%yy%> <%h%> <%AM/PM%><|><%loc_dddd%>, <%loc_mmmm%> <%d%>, <%yyyy%") +
"> <%h%> <%AM/PM%><||><||>65536"));
var_Chart->set_Label(Exganttlib_tlb::UnitEnum::exMinute,TVariant(String("<|><%nn%><|><%h%>:<%nn%> <%AM/PM%><|><%loc_d3%>, <%loc_m3%> <%d%>, '<%yy%> <%h%>:<%nn%> <%AM/PM%><|><%loc_dddd%>, <%loc_mmmm%> ") +
"<%d%>, <%yyyy%> <%h%>:<%nn%> <%AM/PM%>"));
var_Chart->set_Label(Exganttlib_tlb::UnitEnum::exSecond,TVariant(String("<|><%ss%><|><%nn%>:<%ss%><|><%h%>:<%nn%>:<%ss%> <%AM/PM%><|><%loc_d3%>, <%loc_m3%> <%d%>, '<%yy%> <%h%>:<%nn%>:<%ss%> <%AM/PM%>") +
"<|><%loc_dddd%>, <%loc_mmmm%> <%d%>, <%yyyy%> <%h%>:<%nn%>:<%ss%> <%AM/PM%>"));
var_Chart->set_LabelToolTip(Exganttlib_tlb::UnitEnum::exMonth,L"<%loc_mmmm%>/<%yyyy%>");
var_Chart->set_LabelToolTip(Exganttlib_tlb::UnitEnum::exWeek,L"<%loc_mmmm%> <%d%>, <%yyyy%> <%ww%>");
var_Chart->set_LabelToolTip(Exganttlib_tlb::UnitEnum::exDay,L"<%loc_dddd%>, <%loc_mmmm%> <%d%>, <%yyyy%>");
var_Chart->set_LabelToolTip(Exganttlib_tlb::UnitEnum::exHour,L"<%loc_dddd%>, <%loc_mmmm%> <%d%>, <%yyyy%> <%h%> <%AM/PM%>");
var_Chart->set_LabelToolTip(Exganttlib_tlb::UnitEnum::exMinute,L"<%loc_dddd%>, <%loc_mmmm%> <%d%>, <%yyyy%> <%h%>:<%nn%> <%AM/PM%>");
var_Chart->set_LabelToolTip(Exganttlib_tlb::UnitEnum::exSecond,L"<%loc_dddd%>, <%loc_mmmm%> <%d%>, <%yyyy%> <%h%>:<%nn%>:<%ss%> <%AM/PM%>");
Exganttlib_tlb::IChartPtr var_Chart1 = Gantt1->Chart;
var_Chart1->set_PaneWidth(false,0);
var_Chart1->set_FirstVisibleDate(TVariant(TDateTime(2001,1,1).operator double()));
var_Chart1->LevelCount = 4;
var_Chart1->get_Level(0)->set_Label(TVariant(4096));
var_Chart1->get_Level(1)->set_Label(TVariant(65536));
var_Chart1->get_Level(2)->set_Label(TVariant(1048576));
Exganttlib_tlb::ILevelPtr var_Level = var_Chart1->get_Level(3);
var_Level->Count = 15;
var_Level->set_Label(TVariant(16777216));
Gantt1->EndUpdate();
|
|
756
|
The chart's header is displayed in English. Can I change so it is the same as in my regional settings
Gantt1->BeginUpdate();
Exganttlib_tlb::IChartPtr var_Chart = Gantt1->Chart;
var_Chart->set_Label(Exganttlib_tlb::UnitEnum::exMonth,L"<|><%loc_m1%><|><%loc_m2%><|><%loc_m3%><|><%loc_mmmm%><|><%loc_m3%> '<%yy%><|><%loc_mmmm%> <%yyyy%>");
var_Chart->set_Label(Exganttlib_tlb::UnitEnum::exWeek,L"<|><%ww%><|><%loc_m3%> <%d%>, '<%yy%><r><%ww%><|><%loc_mmmm%> <%d%>, <%yyyy%><r><%ww%><||><||>256");
var_Chart->set_Label(Exganttlib_tlb::UnitEnum::exDay,TVariant(String("<|><%loc_d1%><|><%loc_d2%><|><%loc_d3%><|><%loc_dddd%><|><%loc_d3%>, <%loc_m3%> <%d%>, '<%yy%><|><%loc_dddd%>, <%loc_mmmm%> <%d") +
"%>, <%yyyy%><||><||>4096"));
var_Chart->set_Label(Exganttlib_tlb::UnitEnum::exHour,TVariant(String("<|><%hh%><|><%h%> <%AM/PM%><|><%loc_d3%>, <%loc_m3%> <%d%>, '<%yy%> <%h%> <%AM/PM%><|><%loc_dddd%>, <%loc_mmmm%> <%d%>, <%yyyy%") +
"> <%h%> <%AM/PM%><||><||>65536"));
var_Chart->set_Label(Exganttlib_tlb::UnitEnum::exMinute,TVariant(String("<|><%nn%><|><%h%>:<%nn%> <%AM/PM%><|><%loc_d3%>, <%loc_m3%> <%d%>, '<%yy%> <%h%>:<%nn%> <%AM/PM%><|><%loc_dddd%>, <%loc_mmmm%> ") +
"<%d%>, <%yyyy%> <%h%>:<%nn%> <%AM/PM%>"));
var_Chart->set_Label(Exganttlib_tlb::UnitEnum::exSecond,TVariant(String("<|><%ss%><|><%nn%>:<%ss%><|><%h%>:<%nn%>:<%ss%> <%AM/PM%><|><%loc_d3%>, <%loc_m3%> <%d%>, '<%yy%> <%h%>:<%nn%>:<%ss%> <%AM/PM%>") +
"<|><%loc_dddd%>, <%loc_mmmm%> <%d%>, <%yyyy%> <%h%>:<%nn%>:<%ss%> <%AM/PM%>"));
var_Chart->set_LabelToolTip(Exganttlib_tlb::UnitEnum::exMonth,L"<%loc_mmmm%>/<%yyyy%>");
var_Chart->set_LabelToolTip(Exganttlib_tlb::UnitEnum::exWeek,L"<%loc_mmmm%> <%d%>, <%yyyy%> <%ww%>");
var_Chart->set_LabelToolTip(Exganttlib_tlb::UnitEnum::exDay,L"<%loc_dddd%>, <%loc_mmmm%> <%d%>, <%yyyy%>");
var_Chart->set_LabelToolTip(Exganttlib_tlb::UnitEnum::exHour,L"<%loc_dddd%>, <%loc_mmmm%> <%d%>, <%yyyy%> <%h%> <%AM/PM%>");
var_Chart->set_LabelToolTip(Exganttlib_tlb::UnitEnum::exMinute,L"<%loc_dddd%>, <%loc_mmmm%> <%d%>, <%yyyy%> <%h%>:<%nn%> <%AM/PM%>");
var_Chart->set_LabelToolTip(Exganttlib_tlb::UnitEnum::exSecond,L"<%loc_dddd%>, <%loc_mmmm%> <%d%>, <%yyyy%> <%h%>:<%nn%>:<%ss%> <%AM/PM%>");
Exganttlib_tlb::IChartPtr var_Chart1 = Gantt1->Chart;
var_Chart1->set_PaneWidth(false,0);
var_Chart1->set_FirstVisibleDate(TVariant(TDateTime(2001,1,1).operator double()));
var_Chart1->LevelCount = 2;
var_Chart1->UnitScale = Exganttlib_tlb::UnitEnum::exDay;
Gantt1->EndUpdate();
|
|
755
|
It is possible to use seconds/minutes/hours as time scale in your control
Gantt1->BeginUpdate();
Exganttlib_tlb::IChartPtr var_Chart = Gantt1->Chart;
var_Chart->set_PaneWidth(false,0);
var_Chart->set_FirstVisibleDate(TVariant(TDateTime(2001,1,1).operator double()));
var_Chart->LevelCount = 4;
var_Chart->get_Level(0)->set_Label(TVariant(4096));
var_Chart->get_Level(1)->set_Label(TVariant(65536));
var_Chart->get_Level(2)->set_Label(TVariant(1048576));
Exganttlib_tlb::ILevelPtr var_Level = var_Chart->get_Level(3);
var_Level->Count = 15;
var_Level->set_Label(TVariant(16777216));
Gantt1->EndUpdate();
|
|
754
|
How can I prevent highlighting the column from the cursor - point
Gantt1->VisualAppearance->Add(1,TVariant(String("gBFLBCJwBAEHhEJAEGg4BI0IQAAYAQGKIYBkAKBQAGaAoDDUOQzQwAAxDKKUEwsACEIrjKCYVgOHYYRrIMYgBCMJhLEoaZLhEZRQiqDYtRDFQBSDDcPw/EaRZohGaYJ") +
"gEgI="));
Gantt1->Background[Exganttlib_tlb::BackgroundPartEnum::exCursorHoverColumn] = 0x1000000;
Gantt1->Columns->Add(L"S")->Width = 32;
Gantt1->Columns->Add(L"Level 1")->set_LevelKey(TVariant(1));
Gantt1->Columns->Add(L"Level 2")->set_LevelKey(TVariant(1));
Gantt1->Columns->Add(L"Level 3")->set_LevelKey(TVariant(1));
Gantt1->Columns->Add(L"E1")->Width = 32;
Gantt1->Columns->Add(L"E2")->Width = 32;
Gantt1->Columns->Add(L"E3")->Width = 32;
Gantt1->Columns->Add(L"E4")->Width = 32;
|
|
753
|
Can I use and display PNG pictures
Gantt1->HTMLPicture[L"pic1"] = TVariant("c:\\exontrol\\images\\card.png");
Gantt1->HeaderHeight = 48;
Gantt1->Columns->Add(L"ColumnName")->HTMLCaption = L"<b>HTML</b> Column <img>pic1</img> Picture";
|
|
752
|
Is it possible to specify the background color for the item in the chart part only
Gantt1->Columns->Add(L"Default");
Exganttlib_tlb::IItemsPtr var_Items = Gantt1->Items;
long h = var_Items->AddItem(TVariant("Root"));
long hC = var_Items->InsertItem(h,TNoParam(),TVariant("Child 1"));
Gantt1->Chart->set_ItemBackColor(hC,RGB(255,0,0));
var_Items->InsertItem(h,TNoParam(),TVariant("Child 2"));
var_Items->set_ExpandItem(h,true);
|
|
751
|
Is it possible to apply different visual appearance, color, sizes for item in the list and chart part
Gantt1->VisualAppearance->Add(1,TVariant("c:\\exontrol\\images\\normal.ebn"));
Gantt1->VisualAppearance->Add(2,TVariant("c:\\exontrol\\images\\pushed.ebn"));
Gantt1->VisualAppearance->Add(3,TVariant("CP:2 2 2 -2 -2"));
Gantt1->Columns->Add(L"Default");
Gantt1->SelBackMode = Exganttlib_tlb::BackModeEnum::exTransparent;
Exganttlib_tlb::IItemsPtr var_Items = Gantt1->Items;
long h = var_Items->AddItem(TVariant("Root"));
long hC = var_Items->InsertItem(h,TNoParam(),TVariant("Child 1"));
var_Items->set_ItemBackColor(hC,0x1ffff00);
Gantt1->Chart->set_ItemBackColor(hC,0x300ff00);
var_Items->InsertItem(h,TNoParam(),TVariant("Child 2"));
var_Items->set_ExpandItem(h,true);
|
|
750
|
How do I change the visual appearance for the entire item, using your EBN technology
Gantt1->VisualAppearance->Add(1,TVariant("c:\\exontrol\\images\\normal.ebn"));
Gantt1->Columns->Add(L"Default");
Exganttlib_tlb::IItemsPtr var_Items = Gantt1->Items;
long h = var_Items->AddItem(TVariant("Root"));
long hC = var_Items->InsertItem(h,TNoParam(),TVariant("Child 1"));
var_Items->set_ItemBackColor(hC,0x1000000);
Gantt1->Chart->set_ItemBackColor(hC,0x1000000);
var_Items->InsertItem(h,TNoParam(),TVariant("Child 2"));
var_Items->set_ExpandItem(h,true);
|
|
749
|
is it possible to specify the a different background color for the item, list and chart part
Gantt1->Columns->Add(L"Default");
Exganttlib_tlb::IItemsPtr var_Items = Gantt1->Items;
long h = var_Items->AddItem(TVariant("Root"));
long hC = var_Items->InsertItem(h,TNoParam(),TVariant("Child 1"));
var_Items->set_ItemBackColor(hC,RGB(255,0,0));
Gantt1->Chart->set_ItemBackColor(hC,RGB(255,255,0));
var_Items->InsertItem(h,TNoParam(),TVariant("Child 2"));
var_Items->set_ExpandItem(h,true);
|
|
748
|
Is it possible to specify the background color for the entire row, including the chart part
Gantt1->Columns->Add(L"Default");
Exganttlib_tlb::IItemsPtr var_Items = Gantt1->Items;
long h = var_Items->AddItem(TVariant("Root"));
long hC = var_Items->InsertItem(h,TNoParam(),TVariant("Child 1"));
var_Items->set_ItemBackColor(hC,RGB(255,0,0));
Gantt1->Chart->set_ItemBackColor(hC,RGB(255,0,0));
var_Items->InsertItem(h,TNoParam(),TVariant("Child 2"));
var_Items->set_ExpandItem(h,true);
|
|
747
|
How can I show the tooltip programmatically ( I want to be able to set the tooltip content dynamically just before the tooltip start to appear, not using the exBarTooltip )
// MouseMove event - Occurs when the user moves the mouse.
void __fastcall TForm1::Gantt1MouseMove(TObject *Sender,short Button,short Shift,int X,int Y)
{
Gantt1->ShowToolTip(Gantt1->Chart->get_BarFromPoint(-1,-1),TVariant(""),TVariant("8"),TVariant("8"),TNoParam());
}
Gantt1->BeginUpdate();
Gantt1->Columns->Add(L"Def");
Exganttlib_tlb::IChartPtr var_Chart = Gantt1->Chart;
var_Chart->set_PaneWidth(false,64);
var_Chart->LevelCount = 2;
var_Chart->set_FirstVisibleDate(TVariant(TDateTime(2010,1,1).operator double()));
Exganttlib_tlb::IItemsPtr var_Items = Gantt1->Items;
long h = var_Items->AddItem(TVariant("Task"));
var_Items->AddBar(h,TVariant("Task"),TVariant(TDateTime(2010,1,2).operator double()),TVariant(TDateTime(2010,1,5).operator double()),TVariant("A"),TVariant("A"));
var_Items->AddBar(h,TVariant("Task"),TVariant(TDateTime(2010,1,5).operator double()),TVariant(TDateTime(2010,1,8).operator double()),TVariant("B"),TVariant("B"));
var_Items->AddBar(h,TVariant("Task"),TVariant(TDateTime(2010,1,8).operator double()),TVariant(TDateTime(2010,1,11).operator double()),TVariant("C"),TVariant("C"));
Gantt1->EndUpdate();
|
|
746
|
Is it possible to move an item from a parent to another
Gantt1->BeginUpdate();
Gantt1->LinesAtRoot = Exganttlib_tlb::LinesAtRootEnum::exLinesAtRoot;
Gantt1->Columns->Add(L"Items");
Exganttlib_tlb::IItemsPtr var_Items = Gantt1->Items;
var_Items->AddItem(TVariant("A"));
var_Items->AddItem(TVariant("B"));
var_Items->InsertItem(var_Items->AddItem(TVariant("C")),TVariant(""),TVariant("D"));
var_Items->SetParent(var_Items->get_FindItem(TVariant("D"),TVariant(0),TNoParam()),var_Items->get_FindItem(TVariant("A"),TVariant(0),TNoParam()));
Gantt1->EndUpdate();
|
|
745
|
How can I change the identation for an item
Gantt1->BeginUpdate();
Gantt1->LinesAtRoot = Exganttlib_tlb::LinesAtRootEnum::exLinesAtRoot;
Gantt1->Columns->Add(L"Items");
Exganttlib_tlb::IItemsPtr var_Items = Gantt1->Items;
var_Items->AddItem(TVariant("A"));
var_Items->AddItem(TVariant("B"));
var_Items->InsertItem(var_Items->AddItem(TVariant("C")),TVariant(""),TVariant("D"));
var_Items->SetParent(var_Items->get_FindItem(TVariant("D"),TVariant(0),TNoParam()),0);
Gantt1->EndUpdate();
|
|
744
|
How can I specify the levels using the user's Regional and Language Options
Gantt1->BeginUpdate();
Gantt1->Font->Name = L"Arial Unicode MS";
Gantt1->HeaderHeight = 36;
Exganttlib_tlb::IChartPtr var_Chart = Gantt1->Chart;
var_Chart->set_FirstVisibleDate(TVariant(TDateTime(2010,5,30).operator double()));
var_Chart->set_PaneWidth(false,0);
var_Chart->FirstWeekDay = Exganttlib_tlb::WeekDayEnum::exMonday;
var_Chart->UnitWidth = 36;
var_Chart->LevelCount = 2;
Exganttlib_tlb::ILevelPtr var_Level = var_Chart->get_Level(0);
var_Level->set_Label(TVariant("<b><%loc_mmmm%></b> <%yyyy%><br><%loc_sdate%><r> <%ww%> "));
var_Level->set_ToolTip(TVariant(var_Level->get_Label()));
var_Level->Unit = Exganttlib_tlb::UnitEnum::exWeek;
Exganttlib_tlb::ILevelPtr var_Level1 = var_Chart->get_Level(1);
var_Level1->set_Label(TVariant("<%loc_ddd%><br><%d%>"));
var_Level1->set_ToolTip(TVariant(var_Level1->get_Label()));
var_Chart->ToolTip = L"<%loc_ldate%>";
Gantt1->EndUpdate();
|
|
743
|
How can I display a bar only using a gradient color and shadow
Gantt1->BeginUpdate();
Exganttlib_tlb::IChartPtr var_Chart = Gantt1->Chart;
var_Chart->set_FirstVisibleDate(TVariant(TDateTime(2009,12,31).operator double()));
var_Chart->LevelCount = 2;
var_Chart->set_PaneWidth(false,96);
Exganttlib_tlb::IBarPtr var_Bar = var_Chart->Bars->get_Item(TVariant("Task"));
var_Bar->StartColor = RGB(255,255,255);
var_Bar->EndColor = var_Bar->Color;
Gantt1->Columns->Add(L"Types");
Exganttlib_tlb::IItemsPtr var_Items = Gantt1->Items;
var_Items->AddBar(var_Items->AddItem(TVariant("Original")),TVariant("Task"),TVariant(TDateTime(2010,1,4).operator double()),TVariant(TDateTime(2010,1,9).operator double()),TVariant(""),TNoParam());
long h = var_Items->AddItem(TVariant("W/h Gradient"));
var_Items->AddBar(h,TVariant("Task"),TVariant(TDateTime(2010,1,4).operator double()),TVariant(TDateTime(2010,1,9).operator double()),TVariant(""),TNoParam());
var_Items->set_ItemBar(h,TVariant(""),Exganttlib_tlb::ItemBarPropertyEnum::exBarPattern,TVariant(8291));
var_Items->AddBar(var_Items->AddItem(TVariant("Original")),TVariant("Task"),TVariant(TDateTime(2010,1,4).operator double()),TVariant(TDateTime(2010,1,9).operator double()),TVariant(""),TNoParam());
Gantt1->EndUpdate();
|
|
742
|
Is it possible to display a bar only using a gradient color using the exBarColor option
Gantt1->BeginUpdate();
Exganttlib_tlb::IChartPtr var_Chart = Gantt1->Chart;
var_Chart->set_FirstVisibleDate(TVariant(TDateTime(2009,12,31).operator double()));
var_Chart->LevelCount = 2;
var_Chart->set_PaneWidth(false,96);
Exganttlib_tlb::IBarPtr var_Bar = var_Chart->Bars->get_Item(TVariant("Task"));
var_Bar->StartColor = RGB(255,255,255);
var_Bar->EndColor = var_Bar->StartColor;
var_Bar->Height = 17;
Gantt1->Columns->Add(L"Types");
Exganttlib_tlb::IItemsPtr var_Items = Gantt1->Items;
var_Items->AddBar(var_Items->AddItem(TVariant("Original")),TVariant("Task"),TVariant(TDateTime(2010,1,4).operator double()),TVariant(TDateTime(2010,1,9).operator double()),TVariant(""),TNoParam());
long h = var_Items->AddItem(TVariant("W/h Gradient"));
var_Items->AddBar(h,TVariant("Task"),TVariant(TDateTime(2010,1,4).operator double()),TVariant(TDateTime(2010,1,9).operator double()),TVariant(""),TNoParam());
var_Items->set_ItemBar(h,TVariant(""),Exganttlib_tlb::ItemBarPropertyEnum::exBarPattern,TVariant(227));
h = var_Items->AddItem(TVariant("W/h Color"));
var_Items->AddBar(h,TVariant("Task"),TVariant(TDateTime(2010,1,4).operator double()),TVariant(TDateTime(2010,1,9).operator double()),TVariant(""),TNoParam());
var_Items->set_ItemBar(h,TVariant(""),Exganttlib_tlb::ItemBarPropertyEnum::exBarPattern,TVariant(227));
var_Items->set_ItemBar(h,TVariant(""),Exganttlib_tlb::ItemBarPropertyEnum::exBarColor,TVariant(255));
var_Items->AddBar(var_Items->AddItem(TVariant("Original")),TVariant("Task"),TVariant(TDateTime(2010,1,4).operator double()),TVariant(TDateTime(2010,1,9).operator double()),TVariant(""),TNoParam());
Gantt1->EndUpdate();
|
|
741
|
Is it possible to display a bar only using a gradient color
Gantt1->BeginUpdate();
Exganttlib_tlb::IChartPtr var_Chart = Gantt1->Chart;
var_Chart->set_FirstVisibleDate(TVariant(TDateTime(2009,12,31).operator double()));
var_Chart->LevelCount = 2;
var_Chart->set_PaneWidth(false,96);
Exganttlib_tlb::IBarPtr var_Bar = var_Chart->Bars->get_Item(TVariant("Task"));
var_Bar->StartColor = RGB(255,255,255);
var_Bar->EndColor = var_Bar->StartColor;
var_Bar->Height = 17;
Gantt1->Columns->Add(L"Types");
Exganttlib_tlb::IItemsPtr var_Items = Gantt1->Items;
var_Items->AddBar(var_Items->AddItem(TVariant("Original")),TVariant("Task"),TVariant(TDateTime(2010,1,4).operator double()),TVariant(TDateTime(2010,1,9).operator double()),TVariant(""),TNoParam());
long h = var_Items->AddItem(TVariant("W/h Gradient"));
var_Items->AddBar(h,TVariant("Task"),TVariant(TDateTime(2010,1,4).operator double()),TVariant(TDateTime(2010,1,9).operator double()),TVariant(""),TNoParam());
var_Items->set_ItemBar(h,TVariant(""),Exganttlib_tlb::ItemBarPropertyEnum::exBarPattern,TVariant(227));
var_Items->AddBar(var_Items->AddItem(TVariant("Original")),TVariant("Task"),TVariant(TDateTime(2010,1,4).operator double()),TVariant(TDateTime(2010,1,9).operator double()),TVariant(""),TNoParam());
Gantt1->EndUpdate();
|
|
740
|
Is it possible to display a bar only using a gradient color
Gantt1->BeginUpdate();
Exganttlib_tlb::IChartPtr var_Chart = Gantt1->Chart;
var_Chart->set_FirstVisibleDate(TVariant(TDateTime(2009,12,31).operator double()));
var_Chart->LevelCount = 2;
var_Chart->set_PaneWidth(false,96);
Exganttlib_tlb::IBarPtr var_Bar = var_Chart->Bars->get_Item(TVariant("Task"));
var_Bar->StartColor = RGB(255,255,255);
var_Bar->EndColor = var_Bar->Color;
Gantt1->Columns->Add(L"Types");
Exganttlib_tlb::IItemsPtr var_Items = Gantt1->Items;
var_Items->AddBar(var_Items->AddItem(TVariant("Original")),TVariant("Task"),TVariant(TDateTime(2010,1,4).operator double()),TVariant(TDateTime(2010,1,9).operator double()),TVariant(""),TNoParam());
long h = var_Items->AddItem(TVariant("W/h Gradient"));
var_Items->AddBar(h,TVariant("Task"),TVariant(TDateTime(2010,1,4).operator double()),TVariant(TDateTime(2010,1,9).operator double()),TVariant(""),TNoParam());
var_Items->set_ItemBar(h,TVariant(""),Exganttlib_tlb::ItemBarPropertyEnum::exBarPattern,TVariant(99));
var_Items->AddBar(var_Items->AddItem(TVariant("Original")),TVariant("Task"),TVariant(TDateTime(2010,1,4).operator double()),TVariant(TDateTime(2010,1,9).operator double()),TVariant(""),TNoParam());
Gantt1->EndUpdate();
|
|
739
|
How can I display a specified bar only with a thicker border
Gantt1->BeginUpdate();
Exganttlib_tlb::IChartPtr var_Chart = Gantt1->Chart;
var_Chart->set_FirstVisibleDate(TVariant(TDateTime(2009,12,31).operator double()));
var_Chart->LevelCount = 2;
var_Chart->set_PaneWidth(false,96);
Gantt1->Columns->Add(L"Types");
Exganttlib_tlb::IItemsPtr var_Items = Gantt1->Items;
var_Items->AddBar(var_Items->AddItem(TVariant("Original")),TVariant("Task"),TVariant(TDateTime(2010,1,4).operator double()),TVariant(TDateTime(2010,1,9).operator double()),TVariant(""),TNoParam());
long h = var_Items->AddItem(TVariant("W/h Border"));
var_Items->AddBar(h,TVariant("Task"),TVariant(TDateTime(2010,1,4).operator double()),TVariant(TDateTime(2010,1,9).operator double()),TVariant(""),TNoParam());
var_Items->set_ItemBar(h,TVariant(""),Exganttlib_tlb::ItemBarPropertyEnum::exBarPattern,TVariant(4099));
var_Items->AddBar(var_Items->AddItem(TVariant("Original")),TVariant("Task"),TVariant(TDateTime(2010,1,4).operator double()),TVariant(TDateTime(2010,1,9).operator double()),TVariant(""),TNoParam());
Gantt1->EndUpdate();
|
|
738
|
Is it possible to display the shadow for a specified bar
Gantt1->BeginUpdate();
Exganttlib_tlb::IChartPtr var_Chart = Gantt1->Chart;
var_Chart->set_FirstVisibleDate(TVariant(TDateTime(2009,12,31).operator double()));
var_Chart->LevelCount = 2;
var_Chart->set_PaneWidth(false,96);
Gantt1->Columns->Add(L"Types");
Exganttlib_tlb::IItemsPtr var_Items = Gantt1->Items;
var_Items->AddBar(var_Items->AddItem(TVariant("Original")),TVariant("Task"),TVariant(TDateTime(2010,1,4).operator double()),TVariant(TDateTime(2010,1,9).operator double()),TVariant(""),TNoParam());
long h = var_Items->AddItem(TVariant("W/h Shadow"));
var_Items->AddBar(h,TVariant("Task"),TVariant(TDateTime(2010,1,4).operator double()),TVariant(TDateTime(2010,1,9).operator double()),TVariant(""),TNoParam());
var_Items->set_ItemBar(h,TVariant(""),Exganttlib_tlb::ItemBarPropertyEnum::exBarPattern,TVariant(8195));
var_Items->AddBar(var_Items->AddItem(TVariant("Original")),TVariant("Task"),TVariant(TDateTime(2010,1,4).operator double()),TVariant(TDateTime(2010,1,9).operator double()),TVariant(""),TNoParam());
Gantt1->EndUpdate();
|
|
737
|
Is it possible to display the task bars with a gradient color
Gantt1->BeginUpdate();
Exganttlib_tlb::IChartPtr var_Chart = Gantt1->Chart;
var_Chart->set_FirstVisibleDate(TVariant(TDateTime(2009,12,31).operator double()));
var_Chart->LevelCount = 2;
var_Chart->set_PaneWidth(false,96);
var_Chart->Bars->Copy(L"Task",L"TaskO");
Exganttlib_tlb::IBarPtr var_Bar = var_Chart->Bars->get_Item(TVariant("Task"));
var_Bar->Pattern = Exganttlib_tlb::PatternEnum::exPatternGradientVBox | Exganttlib_tlb::PatternEnum::exPatternBox | Exganttlib_tlb::PatternEnum::exPatternShadow;
var_Bar->StartColor = RGB(255,255,255);
var_Bar->EndColor = var_Bar->Color;
Gantt1->Columns->Add(L"Types");
Exganttlib_tlb::IItemsPtr var_Items = Gantt1->Items;
var_Items->AddBar(var_Items->AddItem(TVariant("Original")),TVariant("TaskO"),TVariant(TDateTime(2010,1,4).operator double()),TVariant(TDateTime(2010,1,9).operator double()),TVariant(""),TNoParam());
var_Items->AddBar(var_Items->AddItem(TVariant("Pattern Gradient")),TVariant("Task"),TVariant(TDateTime(2010,1,4).operator double()),TVariant(TDateTime(2010,1,9).operator double()),TVariant(""),TNoParam());
var_Items->AddBar(var_Items->AddItem(TVariant("Original")),TVariant("TaskO"),TVariant(TDateTime(2010,1,4).operator double()),TVariant(TDateTime(2010,1,9).operator double()),TVariant(""),TNoParam());
Gantt1->EndUpdate();
|
|
736
|
How can I know the type of bars I can displays using predefined patterns
Gantt1->BeginUpdate();
Exganttlib_tlb::IChartPtr var_Chart = Gantt1->Chart;
var_Chart->set_FirstVisibleDate(TVariant(TDateTime(2009,12,31).operator double()));
var_Chart->LevelCount = 2;
var_Chart->set_PaneWidth(false,96);
Exganttlib_tlb::IBarsPtr var_Bars = var_Chart->Bars;
var_Bars->Add(L"Box")->Pattern = Exganttlib_tlb::PatternEnum::exPatternBox;
var_Bars->Add(L"ThickBox")->Pattern = Exganttlib_tlb::PatternEnum::exPatternThickBox | Exganttlib_tlb::PatternEnum::exPatternBox;
var_Bars->Add(L"DiagBox")->Pattern = Exganttlib_tlb::PatternEnum::exPatternThickBox | Exganttlib_tlb::PatternEnum::exPatternBDiagonal;
var_Bars->Copy(L"Task",L"Shadow")->Pattern = Exganttlib_tlb::PatternEnum::exPatternFrameShadow | Exganttlib_tlb::PatternEnum::exPatternShadow;
var_Bars->Copy(L"Task",L"TShadow")->Pattern = Exganttlib_tlb::PatternEnum::exPatternFrameShadow | Exganttlib_tlb::PatternEnum::exPatternThickBox | Exganttlib_tlb::PatternEnum::exPatternDiagCross;
Exganttlib_tlb::IBarPtr var_Bar = var_Bars->Add(L"HGrad1");
var_Bar->Pattern = Exganttlib_tlb::PatternEnum::exPatternBox;
var_Bar->StartColor = RGB(255,255,255);
var_Bar->EndColor = RGB(0,0,255);
Exganttlib_tlb::IBarPtr var_Bar1 = var_Bars->Add(L"HGrad2");
var_Bar1->Pattern = Exganttlib_tlb::PatternEnum::exPatternBox | Exganttlib_tlb::PatternEnum::exPatternShadow;
var_Bar1->StartColor = RGB(255,255,255);
var_Bar1->EndColor = RGB(0,0,255);
var_Bar1->Color = RGB(0,0,255);
Exganttlib_tlb::IBarPtr var_Bar2 = var_Bars->Add(L"HGrad3");
var_Bar2->Pattern = Exganttlib_tlb::PatternEnum::exPatternGradient3Colors | Exganttlib_tlb::PatternEnum::exPatternBox | Exganttlib_tlb::PatternEnum::exPatternShadow;
var_Bar2->StartColor = RGB(255,255,255);
var_Bar2->EndColor = var_Bar2->StartColor;
var_Bar2->Color = RGB(0,0,255);
Exganttlib_tlb::IBarPtr var_Bar3 = var_Bars->Add(L"HGrad4");
var_Bar3->Pattern = Exganttlib_tlb::PatternEnum::exPatternThickBox | Exganttlib_tlb::PatternEnum::exPatternGradient3Colors | Exganttlib_tlb::PatternEnum::exPatternBox;
var_Bar3->StartColor = RGB(255,255,255);
var_Bar3->EndColor = var_Bar3->StartColor;
var_Bar3->Color = RGB(0,0,255);
Exganttlib_tlb::IBarPtr var_Bar4 = var_Bars->Add(L"HGrad5");
var_Bar4->Pattern = Exganttlib_tlb::PatternEnum::exPatternFrameShadow | Exganttlib_tlb::PatternEnum::exPatternGradient3Colors | Exganttlib_tlb::PatternEnum::exPatternBox;
var_Bar4->StartColor = RGB(0,255,0);
var_Bar4->EndColor = RGB(255,0,0);
var_Bar4->Color = RGB(0,0,255);
Exganttlib_tlb::IBarPtr var_Bar5 = var_Bars->Add(L"VGrad1");
var_Bar5->Pattern = Exganttlib_tlb::PatternEnum::exPatternGradientVBox | Exganttlib_tlb::PatternEnum::exPatternBox;
var_Bar5->StartColor = RGB(255,255,255);
var_Bar5->EndColor = RGB(0,0,255);
var_Bar5->Height = 14;
Exganttlib_tlb::IBarPtr var_Bar6 = var_Bars->Add(L"VGrad2");
var_Bar6->Pattern = Exganttlib_tlb::PatternEnum::exPatternGradientVBox | Exganttlib_tlb::PatternEnum::exPatternBox | Exganttlib_tlb::PatternEnum::exPatternShadow;
var_Bar6->StartColor = RGB(255,255,255);
var_Bar6->EndColor = RGB(0,0,255);
var_Bar6->Color = RGB(0,0,255);
var_Bar6->Height = 14;
Exganttlib_tlb::IBarPtr var_Bar7 = var_Bars->Add(L"VGrad3");
var_Bar7->Pattern = Exganttlib_tlb::PatternEnum::exPatternGradient3Colors | Exganttlib_tlb::PatternEnum::exPatternGradientVBox | Exganttlib_tlb::PatternEnum::exPatternBox | Exganttlib_tlb::PatternEnum::exPatternShadow;
var_Bar7->StartColor = RGB(255,255,255);
var_Bar7->EndColor = var_Bar7->StartColor;
var_Bar7->Color = RGB(0,0,255);
var_Bar7->Height = 14;
Exganttlib_tlb::IBarPtr var_Bar8 = var_Bars->Add(L"VGrad4");
var_Bar8->Pattern = Exganttlib_tlb::PatternEnum::exPatternThickBox | Exganttlib_tlb::PatternEnum::exPatternGradient3Colors | Exganttlib_tlb::PatternEnum::exPatternGradientVBox | Exganttlib_tlb::PatternEnum::exPatternBox;
var_Bar8->StartColor = RGB(255,255,255);
var_Bar8->EndColor = var_Bar8->StartColor;
var_Bar8->Color = RGB(0,0,255);
var_Bar8->Height = -1;
Exganttlib_tlb::IBarPtr var_Bar9 = var_Bars->Add(L"VGrad5");
var_Bar9->Pattern = Exganttlib_tlb::PatternEnum::exPatternFrameShadow | Exganttlib_tlb::PatternEnum::exPatternGradient3Colors | Exganttlib_tlb::PatternEnum::exPatternGradientVBox | Exganttlib_tlb::PatternEnum::exPatternBox;
var_Bar9->StartColor = RGB(0,255,0);
var_Bar9->EndColor = RGB(255,0,0);
var_Bar9->Color = RGB(0,0,255);
var_Bar9->Height = 14;
Gantt1->Columns->Add(L"Types");
Exganttlib_tlb::IItemsPtr var_Items = Gantt1->Items;
var_Items->AddBar(var_Items->AddItem(TVariant("Box")),TVariant("Box"),TVariant(TDateTime(2010,1,4).operator double()),TVariant(TDateTime(2010,1,9).operator double()),TVariant(""),TNoParam());
var_Items->AddBar(var_Items->AddItem(TVariant("Thick Box")),TVariant("ThickBox"),TVariant(TDateTime(2010,1,4).operator double()),TVariant(TDateTime(2010,1,9).operator double()),TVariant(""),TNoParam());
var_Items->AddBar(var_Items->AddItem(TVariant("Thick Box Diag")),TVariant("DiagBox"),TVariant(TDateTime(2010,1,4).operator double()),TVariant(TDateTime(2010,1,9).operator double()),TVariant(""),TNoParam());
var_Items->AddBar(var_Items->AddItem(TVariant("Shadow")),TVariant("Shadow"),TVariant(TDateTime(2010,1,4).operator double()),TVariant(TDateTime(2010,1,9).operator double()),TVariant(""),TNoParam());
var_Items->AddBar(var_Items->AddItem(TVariant("Thick Shadow")),TVariant("TShadow"),TVariant(TDateTime(2010,1,4).operator double()),TVariant(TDateTime(2010,1,9).operator double()),TVariant(""),TNoParam());
var_Items->AddBar(var_Items->AddItem(TVariant("Solid Gradient")),TVariant("HGrad1"),TVariant(TDateTime(2010,1,4).operator double()),TVariant(TDateTime(2010,1,9).operator double()),TVariant(""),TNoParam());
var_Items->AddBar(var_Items->AddItem(TVariant("Pattern Gradient")),TVariant("HGrad2"),TVariant(TDateTime(2010,1,4).operator double()),TVariant(TDateTime(2010,1,9).operator double()),TVariant(""),TNoParam());
var_Items->AddBar(var_Items->AddItem(TVariant("Pattern Gradient 3 Colors")),TVariant("HGrad3"),TVariant(TDateTime(2010,1,4).operator double()),TVariant(TDateTime(2010,1,9).operator double()),TVariant(""),TNoParam());
var_Items->AddBar(var_Items->AddItem(TVariant("Solid Gradient 3 Colors")),TVariant("HGrad4"),TVariant(TDateTime(2010,1,4).operator double()),TVariant(TDateTime(2010,1,9).operator double()),TVariant(""),TNoParam());
var_Items->AddBar(var_Items->AddItem(TVariant("Gradient Shadow")),TVariant("HGrad5"),TVariant(TDateTime(2010,1,4).operator double()),TVariant(TDateTime(2010,1,9).operator double()),TVariant(""),TNoParam());
var_Items->AddBar(var_Items->AddItem(TVariant("Solid Gradient")),TVariant("VGrad1"),TVariant(TDateTime(2010,1,4).operator double()),TVariant(TDateTime(2010,1,9).operator double()),TVariant(""),TNoParam());
var_Items->AddBar(var_Items->AddItem(TVariant("Pattern Gradient")),TVariant("VGrad2"),TVariant(TDateTime(2010,1,4).operator double()),TVariant(TDateTime(2010,1,9).operator double()),TVariant(""),TNoParam());
var_Items->AddBar(var_Items->AddItem(TVariant("Pattern Gradient 3 Colors")),TVariant("VGrad3"),TVariant(TDateTime(2010,1,4).operator double()),TVariant(TDateTime(2010,1,9).operator double()),TVariant(""),TNoParam());
var_Items->AddBar(var_Items->AddItem(TVariant("Solid Gradient 3 Colors")),TVariant("VGrad4"),TVariant(TDateTime(2010,1,4).operator double()),TVariant(TDateTime(2010,1,9).operator double()),TVariant(""),TNoParam());
var_Items->AddBar(var_Items->AddItem(TVariant("Gradient Shadow")),TVariant("VGrad5"),TVariant(TDateTime(2010,1,4).operator double()),TVariant(TDateTime(2010,1,9).operator double()),TVariant(""),TNoParam());
Gantt1->EndUpdate();
|
|
735
|
Is it possible to display the bars with a thicker border
Gantt1->BeginUpdate();
Gantt1->Columns->Add(L"Task");
Gantt1->Chart->set_FirstVisibleDate(TVariant(TDateTime(2001,1,1).operator double()));
Gantt1->Chart->set_PaneWidth(false,48);
Gantt1->Chart->Bars->Copy(L"Task",L"TaskB")->Pattern = Exganttlib_tlb::PatternEnum::exPatternThickBox | Exganttlib_tlb::PatternEnum::exPatternShadow;
Exganttlib_tlb::IItemsPtr var_Items = Gantt1->Items;
var_Items->AddBar(var_Items->AddItem(TVariant("Task 1")),TVariant("Task"),TVariant(TDateTime(2001,1,2).operator double()),TVariant(TDateTime(2001,1,5).operator double()),TVariant(""),TNoParam());
var_Items->AddBar(var_Items->AddItem(TVariant("Task 2")),TVariant("TaskB"),TVariant(TDateTime(2001,1,2).operator double()),TVariant(TDateTime(2001,1,5).operator double()),TVariant(""),TNoParam());
var_Items->AddBar(var_Items->AddItem(TVariant("Task 3")),TVariant("Task"),TVariant(TDateTime(2001,1,2).operator double()),TVariant(TDateTime(2001,1,5).operator double()),TVariant(""),TNoParam());
Gantt1->EndUpdate();
|
|
734
|
Is it possible to display the shadow for EBN bars
Gantt1->BeginUpdate();
Gantt1->VisualAppearance->Add(1,TVariant("c:\\exontrol\\images\\normal.ebn"));
Gantt1->Columns->Add(L"Task");
Gantt1->Chart->set_FirstVisibleDate(TVariant(TDateTime(2001,1,1).operator double()));
Gantt1->Chart->set_PaneWidth(false,48);
Exganttlib_tlb::IBarPtr var_Bar = Gantt1->Chart->Bars->Copy(L"Task",L"EBN");
var_Bar->Color = 0x1000000;
var_Bar->Pattern = Exganttlib_tlb::PatternEnum::exPatternFrameShadow;
Gantt1->Chart->Bars->Copy(L"Task",L"EBN2")->Color = 0x1000000;
Exganttlib_tlb::IItemsPtr var_Items = Gantt1->Items;
var_Items->AddBar(var_Items->AddItem(TVariant("Task 1")),TVariant("EBN2"),TVariant(TDateTime(2001,1,2).operator double()),TVariant(TDateTime(2001,1,5).operator double()),TVariant(""),TNoParam());
var_Items->AddBar(var_Items->AddItem(TVariant("Task 2")),TVariant("EBN"),TVariant(TDateTime(2001,1,2).operator double()),TVariant(TDateTime(2001,1,5).operator double()),TVariant(""),TNoParam());
var_Items->AddBar(var_Items->AddItem(TVariant("Task 3")),TVariant("EBN2"),TVariant(TDateTime(2001,1,2).operator double()),TVariant(TDateTime(2001,1,5).operator double()),TVariant(""),TNoParam());
Gantt1->EndUpdate();
|
|
733
|
Can I display a shadow for my bars
Gantt1->BeginUpdate();
Gantt1->Columns->Add(L"Task");
Gantt1->Chart->set_FirstVisibleDate(TVariant(TDateTime(2001,1,1).operator double()));
Gantt1->Chart->set_PaneWidth(false,48);
Gantt1->Chart->Bars->get_Item(TVariant("Task"))->Pattern = Exganttlib_tlb::PatternEnum::exPatternFrameShadow | Exganttlib_tlb::PatternEnum::exPatternShadow;
Exganttlib_tlb::IItemsPtr var_Items = Gantt1->Items;
var_Items->AddBar(var_Items->AddItem(TVariant("Task 1")),TVariant("Task"),TVariant(TDateTime(2001,1,2).operator double()),TVariant(TDateTime(2001,1,5).operator double()),TVariant(""),TNoParam());
var_Items->AddBar(var_Items->AddItem(TVariant("Task 2")),TVariant("Task"),TVariant(TDateTime(2001,1,2).operator double()),TVariant(TDateTime(2001,1,5).operator double()),TVariant(""),TNoParam());
Gantt1->EndUpdate();
|
|
732
|
How can I use the Color property for gradient bars
Gantt1->BeginUpdate();
Gantt1->Columns->Add(L"Task");
Gantt1->Chart->set_FirstVisibleDate(TVariant(TDateTime(2001,1,1).operator double()));
Gantt1->Chart->set_PaneWidth(false,48);
Exganttlib_tlb::IBarPtr var_Bar = Gantt1->Chart->Bars->Add(L"V");
var_Bar->Color = RGB(255,0,0);
var_Bar->StartColor = RGB(0,255,0);
var_Bar->EndColor = var_Bar->StartColor;
var_Bar->Pattern = Exganttlib_tlb::PatternEnum::exPatternGradient3Colors | Exganttlib_tlb::PatternEnum::exPatternGradientVBox | Exganttlib_tlb::PatternEnum::exPatternBox;
var_Bar->Height = -1;
Exganttlib_tlb::IBarPtr var_Bar1 = Gantt1->Chart->Bars->Add(L"H");
var_Bar1->Color = RGB(255,0,0);
var_Bar1->StartColor = RGB(0,255,0);
var_Bar1->EndColor = var_Bar1->StartColor;
var_Bar1->Pattern = Exganttlib_tlb::PatternEnum::exPatternGradient3Colors | Exganttlib_tlb::PatternEnum::exPatternBox;
Exganttlib_tlb::IItemsPtr var_Items = Gantt1->Items;
var_Items->AddBar(var_Items->AddItem(TVariant("Task 1")),TVariant("V"),TVariant(TDateTime(2001,1,2).operator double()),TVariant(TDateTime(2001,1,5).operator double()),TVariant(""),TNoParam());
var_Items->AddBar(var_Items->AddItem(TVariant("Task 2")),TVariant("H"),TVariant(TDateTime(2001,1,2).operator double()),TVariant(TDateTime(2001,1,5).operator double()),TVariant(""),TNoParam());
Gantt1->EndUpdate();
|
|
731
|
Is there any option to show bars with vertical gradient
Gantt1->Columns->Add(L"Task");
Gantt1->Chart->set_FirstVisibleDate(TVariant(TDateTime(2001,1,1).operator double()));
Exganttlib_tlb::IBarPtr var_Bar = Gantt1->Chart->Bars->get_Item(TVariant("Task"));
var_Bar->Color = RGB(255,0,0);
var_Bar->StartColor = RGB(0,255,0);
var_Bar->EndColor = RGB(255,255,0);
var_Bar->Pattern = Exganttlib_tlb::PatternEnum::exPatternGradientVBox | Exganttlib_tlb::PatternEnum::exPatternBox;
Exganttlib_tlb::IItemsPtr var_Items = Gantt1->Items;
long h = var_Items->AddItem(TVariant("Task"));
var_Items->AddBar(h,TVariant("Task"),TVariant(TDateTime(2001,1,2).operator double()),TVariant(TDateTime(2001,1,5).operator double()),TVariant(""),TNoParam());
|
|
730
|
How can I define a new milestone bar
Gantt1->BeginUpdate();
Gantt1->Images(TVariant(String("gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/oFBoVDolFo1HpFJpVLplNp1PqFRqVTq") +
"lVq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m" +
"0ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/y" +
"NAOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA="));
Gantt1->Chart->set_FirstVisibleDate(TVariant(TDateTime(2001,1,1).operator double()));
Exganttlib_tlb::IBarsPtr var_Bars = Gantt1->Chart->Bars;
var_Bars->AddShapeCorner(TVariant(12345),TVariant(1));
var_Bars->AddShapeCorner(TVariant(12346),TVariant(2));
var_Bars->Copy(L"Milestone",L"M1")->StartShape = Exganttlib_tlb::ShapeCornerEnum(0x3020 | Exganttlib_tlb::ShapeCornerEnum::exShapeIconVBar | Exganttlib_tlb::ShapeCornerEnum::exShapeIconRight);
var_Bars->Copy(L"Milestone",L"M2")->StartShape = Exganttlib_tlb::ShapeCornerEnum(0x3020 | Exganttlib_tlb::ShapeCornerEnum::exShapeIconSquare | Exganttlib_tlb::ShapeCornerEnum::exShapeIconRight);
Exganttlib_tlb::IBarPtr var_Bar = var_Bars->Copy(L"Milestone",L"MP");
var_Bar->StartShape = Exganttlib_tlb::ShapeCornerEnum::exShapeIconStar;
var_Bar->StartColor = RGB(255,0,0);
Gantt1->Columns->Add(L"Column");
Exganttlib_tlb::IItemsPtr var_Items = Gantt1->Items;
var_Items->AddBar(var_Items->AddItem(TVariant("Default")),TVariant("Milestone"),TVariant(TDateTime(2001,1,2).operator double()),TVariant(TDateTime(2001,1,2).operator double()),TNoParam(),TNoParam());
var_Items->AddBar(var_Items->AddItem(TVariant("Predefined")),TVariant("MP"),TVariant(TDateTime(2001,1,3).operator double()),TVariant(TDateTime(2001,1,3).operator double()),TNoParam(),TNoParam());
var_Items->AddBar(var_Items->AddItem(TVariant("Custom 1")),TVariant("M1"),TVariant(TDateTime(2001,1,4).operator double()),TVariant(TDateTime(2001,1,4).operator double()),TNoParam(),TNoParam());
var_Items->AddBar(var_Items->AddItem(TVariant("Custom 2")),TVariant("M2"),TVariant(TDateTime(2001,1,5).operator double()),TVariant(TDateTime(2001,1,5).operator double()),TNoParam(),TNoParam());
Gantt1->EndUpdate();
|
|
729
|
How can I define my milestone bar, using my icons or pictures
Gantt1->Images(TVariant(String("gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/oFBoVDolFo1HpFJpVLplNp1PqFRqVTq") +
"lVq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m" +
"0ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/y" +
"NAOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA="));
Gantt1->Chart->set_FirstVisibleDate(TVariant(TDateTime(2001,1,1).operator double()));
Exganttlib_tlb::IBarsPtr var_Bars = Gantt1->Chart->Bars;
var_Bars->AddShapeCorner(TVariant(12345),TVariant(1));
var_Bars->get_Item(TVariant("Milestone"))->StartShape = Exganttlib_tlb::ShapeCornerEnum(0x3020 | Exganttlib_tlb::ShapeCornerEnum::exShapeIconVBar | Exganttlib_tlb::ShapeCornerEnum::exShapeIconRight);
Gantt1->Columns->Add(L"Column");
Exganttlib_tlb::IItemsPtr var_Items = Gantt1->Items;
var_Items->AddBar(var_Items->AddItem(TVariant("Item 1")),TVariant("Milestone"),TVariant(TDateTime(2001,1,2).operator double()),TVariant(TDateTime(2001,1,2).operator double()),TNoParam(),TNoParam());
|
|
728
|
I haven't found options to localize (in Italian) the strings ( dates, tooltip ) that shows in the chart area
Gantt1->BeginUpdate();
Exganttlib_tlb::IChartPtr var_Chart = Gantt1->Chart;
var_Chart->LevelCount = 2;
var_Chart->set_PaneWidth(false,0);
var_Chart->set_Label(Exganttlib_tlb::UnitEnum::exWeek,L"<|><%ww%><|><%d%> <%m3%> '<%yy%><r><%ww%><|><%d%> <%mmmm%> <%yyyy%><r><%ww%><||><||>256");
var_Chart->set_Label(Exganttlib_tlb::UnitEnum::exDay,L"<|><%d1%><|><%d2%><|><%d3%><|><%dddd%><|><%d3%> <%d%> <%m3%> '<%yy%><|><%dddd%> <%d%> <%mmmm%> <%yyyy%><||><||>4096");
var_Chart->set_LabelToolTip(Exganttlib_tlb::UnitEnum::exWeek,L"<%d%> <%mmmm%> <%yyyy%> <%ww%>");
var_Chart->set_LabelToolTip(Exganttlib_tlb::UnitEnum::exDay,L"<%dddd%> <%d%> <%mmmm%> <%yyyy%>");
var_Chart->FirstWeekDay = Exganttlib_tlb::WeekDayEnum::exMonday;
var_Chart->MonthNames = L"gennaio febbraio marzo aprile maggio giugno luglio agosto settembre ottobre novembre dicembre";
var_Chart->WeekDays = L"domenica lunedì martedì mercoledì giovedì venerdì sabato";
var_Chart->ToolTip = L"<%dddd%> <%d%> <%mmmm%> <%yyyy%>";
var_Chart->UnitScale = Exganttlib_tlb::UnitEnum::exDay;
Gantt1->EndUpdate();
|
|
727
|
I haven't found options to localize (in Dutch) the strings ( dates, tooltip ) that shows in the chart area
Gantt1->BeginUpdate();
Exganttlib_tlb::IChartPtr var_Chart = Gantt1->Chart;
var_Chart->LevelCount = 2;
var_Chart->set_PaneWidth(false,0);
var_Chart->set_Label(Exganttlib_tlb::UnitEnum::exWeek,L"<|><%ww%><|><%d%> <%m3%> '<%yy%><r><%ww%><|><%d%> <%mmmm%> <%yyyy%><r><%ww%><||><||>256");
var_Chart->set_Label(Exganttlib_tlb::UnitEnum::exDay,L"<|><%d1%><|><%d2%><|><%d3%><|><%dddd%><|><%d3%> <%d%> <%m3%> '<%yy%><|><%dddd%> <%d%> <%mmmm%> <%yyyy%><||><||>4096");
var_Chart->set_LabelToolTip(Exganttlib_tlb::UnitEnum::exWeek,L"<%d%> <%mmmm%> <%yyyy%> <%ww%>");
var_Chart->set_LabelToolTip(Exganttlib_tlb::UnitEnum::exDay,L"<%dddd%> <%d%> <%mmmm%> <%yyyy%>");
var_Chart->FirstWeekDay = Exganttlib_tlb::WeekDayEnum::exMonday;
var_Chart->MonthNames = L"januari februari maart april mei juni juli augusts september oktober november december";
var_Chart->WeekDays = L"zondag maandag dinsdag woensdag donderdag vrijdag zaterdag";
var_Chart->ToolTip = L"<%dddd%> <%d%> <%mmmm%> <%yyyy%>";
var_Chart->UnitScale = Exganttlib_tlb::UnitEnum::exDay;
Gantt1->EndUpdate();
|
|
726
|
I haven't found options to localize (in German) the strings ( dates, tooltip ) that shows in the chart area
Gantt1->BeginUpdate();
Exganttlib_tlb::IChartPtr var_Chart = Gantt1->Chart;
var_Chart->LevelCount = 2;
var_Chart->set_PaneWidth(false,0);
var_Chart->set_Label(Exganttlib_tlb::UnitEnum::exWeek,L"<|><%ww%><|><%d%> <%m3%> '<%yy%><r><%ww%><|><%d%>.<%mmmm%> <%yyyy%><r><%ww%><||><||>256");
var_Chart->set_Label(Exganttlib_tlb::UnitEnum::exDay,L"<|><%d1%><|><%d2%><|><%d3%><|><%dddd%><|><%d3%> <%d%>.<%m3%> '<%yy%><|><%dddd%> <%d%>.<%mmmm%> <%yyyy%><||><||>4096");
var_Chart->set_LabelToolTip(Exganttlib_tlb::UnitEnum::exWeek,L"<%d%>.<%mmmm%> <%yyyy%> <%ww%>");
var_Chart->set_LabelToolTip(Exganttlib_tlb::UnitEnum::exDay,L"<%dddd%>, <%d%>.<%mmmm%> <%yyyy%>");
var_Chart->FirstWeekDay = Exganttlib_tlb::WeekDayEnum::exMonday;
var_Chart->MonthNames = L"Januar Februar März April Mai Juni Juli August September Oktober November Dezember";
var_Chart->WeekDays = L"Sonntag Montag Dienstag Mittwoch Donnerstag Freitag Samstag";
var_Chart->ToolTip = L"<%dddd%>,<%d%>.<%mmmm%> <%yyyy%>";
var_Chart->UnitScale = Exganttlib_tlb::UnitEnum::exDay;
Gantt1->EndUpdate();
|
|
725
|
I haven't found options to localize (in French) the strings ( dates, tooltip ) that shows in the chart area
Gantt1->BeginUpdate();
Exganttlib_tlb::IChartPtr var_Chart = Gantt1->Chart;
var_Chart->LevelCount = 2;
var_Chart->set_PaneWidth(false,0);
var_Chart->set_Label(Exganttlib_tlb::UnitEnum::exWeek,L"<|><%ww%><|><%d%> <%m3%> '<%yy%><r><%ww%><|><%d%> <%mmmm%> <%yyyy%><r><%ww%><||><||>256");
var_Chart->set_Label(Exganttlib_tlb::UnitEnum::exDay,L"<|><%d1%><|><%d2%><|><%d3%><|><%dddd%><|><%d3%> <%d%> <%m3%> '<%yy%><|><%dddd%> <%d%> <%mmmm%> <%yyyy%><||><||>4096");
var_Chart->set_LabelToolTip(Exganttlib_tlb::UnitEnum::exWeek,L"<%d%> <%mmmm%> <%yyyy%> <%ww%>");
var_Chart->set_LabelToolTip(Exganttlib_tlb::UnitEnum::exDay,L"<%dddd%> <%d%> <%mmmm%> <%yyyy%>");
var_Chart->FirstWeekDay = Exganttlib_tlb::WeekDayEnum::exMonday;
var_Chart->MonthNames = L"janvier février mars avril mai juin juillet août septembre octobre novembre décembre";
var_Chart->WeekDays = L"dimanche lundi mardi mercredi jeudi vendredi samedi";
var_Chart->ToolTip = L"<%dddd%> <%d%> <%mmmm%> <%yyyy%>";
var_Chart->UnitScale = Exganttlib_tlb::UnitEnum::exDay;
Gantt1->EndUpdate();
|
|
724
|
How can I filter programatically using more columns
Gantt1->BeginUpdate();
Gantt1->Chart->set_PaneWidth(true,0);
Exganttlib_tlb::IColumnsPtr var_Columns = Gantt1->Columns;
var_Columns->Add(L"Car");
var_Columns->Add(L"Equipment");
Exganttlib_tlb::IItemsPtr var_Items = Gantt1->Items;
var_Items->set_CellCaption(TVariant(var_Items->AddItem(TVariant("Mazda"))),TVariant(1),TVariant("Air Bag"));
var_Items->set_CellCaption(TVariant(var_Items->AddItem(TVariant("Toyota"))),TVariant(1),TVariant("Air Bag,Air condition"));
var_Items->set_CellCaption(TVariant(var_Items->AddItem(TVariant("Ford"))),TVariant(1),TVariant("Air condition"));
var_Items->set_CellCaption(TVariant(var_Items->AddItem(TVariant("Nissan"))),TVariant(1),TVariant("Air Bag,ABS,ESP"));
var_Items->set_CellCaption(TVariant(var_Items->AddItem(TVariant("Mazda"))),TVariant(1),TVariant("Air Bag, ABS,ESP"));
var_Items->set_CellCaption(TVariant(var_Items->AddItem(TVariant("Mazda"))),TVariant(1),TVariant("ABS,ESP"));
Exganttlib_tlb::IColumnPtr var_Column = Gantt1->Columns->get_Item(TVariant("Car"));
var_Column->FilterType = Exganttlib_tlb::FilterTypeEnum::exFilter;
var_Column->Filter = L"Mazda";
Exganttlib_tlb::IColumnPtr var_Column1 = Gantt1->Columns->get_Item(TVariant("Equipment"));
var_Column1->FilterType = Exganttlib_tlb::FilterTypeEnum::exPattern;
var_Column1->Filter = L"*ABS*|*ESP*";
Gantt1->ApplyFilter();
Gantt1->EndUpdate();
|
|
723
|
I have seen the IN function but it returns -1 or 0. How can I display the value being found ( SWITCH usage )
Gantt1->BeginUpdate();
Exganttlib_tlb::IColumnPtr var_Column = Gantt1->Columns->Add(L"Value");
var_Column->Width = 24;
Exganttlib_tlb::IColumnPtr var_Column1 = Gantt1->Columns->Add(L"SWITCH - statment");
var_Column1->ComputedField = L"%0 switch ('not found', 1,2,3,4,5,7,8,9,11,13,14)";
var_Column1->ToolTip = var_Column1->ComputedField;
Exganttlib_tlb::IItemsPtr var_Items = Gantt1->Items;
var_Items->AddItem(TVariant(0));
var_Items->AddItem(TVariant(1));
var_Items->AddItem(TVariant(2));
Gantt1->EndUpdate();
|
|
722
|
I have a large collection of constant values and using or operator is a time consuming (IN usage). Is there any way to increase the speed to check if a value maches the collection
Gantt1->BeginUpdate();
Exganttlib_tlb::IColumnPtr var_Column = Gantt1->Columns->Add(L"Value");
var_Column->Width = 24;
Exganttlib_tlb::IColumnPtr var_Column1 = Gantt1->Columns->Add(L"IN - statment");
var_Column1->ComputedField = L"%0 in (1,2,3,4,5,7,8,9,11,13,14) ? 'found' : ''";
var_Column1->ToolTip = var_Column1->ComputedField;
Exganttlib_tlb::IItemsPtr var_Items = Gantt1->Items;
var_Items->AddItem(TVariant(0));
var_Items->AddItem(TVariant(1));
var_Items->AddItem(TVariant(2));
Gantt1->EndUpdate();
|
|
721
|
How can I use the CASE statement (CASE usage)
Gantt1->BeginUpdate();
Exganttlib_tlb::IColumnPtr var_Column = Gantt1->Columns->Add(L"Value");
var_Column->Width = 24;
Exganttlib_tlb::IColumnPtr var_Column1 = Gantt1->Columns->Add(L"CASE - statment");
var_Column1->ComputedField = TVariant(String("%0 case (default:'not found';1:%0;2:2*%0;3:3*%0;4:4*%0;5:5*%0;7:'Seven';8:'Eight';9:'Nine';11:'Eleven';13:'Thirtheen';14:'Fourt") +
"heen')");
var_Column1->ToolTip = var_Column1->ComputedField;
Exganttlib_tlb::IItemsPtr var_Items = Gantt1->Items;
var_Items->AddItem(TVariant(0));
var_Items->AddItem(TVariant(1));
var_Items->AddItem(TVariant(2));
Gantt1->EndUpdate();
|
|
720
|
How can I use the CASE statement (CASE usage)
Gantt1->BeginUpdate();
Exganttlib_tlb::IColumnPtr var_Column = Gantt1->Columns->Add(L"Value");
var_Column->Width = 24;
Exganttlib_tlb::IColumnPtr var_Column1 = Gantt1->Columns->Add(L"CASE - statment");
var_Column1->ComputedField = TVariant(String("%0 case (default:'not found';1:'One';2:'Two';3:'Three';4:'Four';5:'Five';7:'Seven';8:'Eight';9:'Nine';11:'Eleven';13:'Thirtheen") +
"';14:'Fourtheen')");
var_Column1->ToolTip = var_Column1->ComputedField;
Exganttlib_tlb::IItemsPtr var_Items = Gantt1->Items;
var_Items->AddItem(TVariant(0));
var_Items->AddItem(TVariant(1));
var_Items->AddItem(TVariant(2));
Gantt1->EndUpdate();
|
|
719
|
Is is possible to use HTML tags to display in the filter caption
Gantt1->BeginUpdate();
Gantt1->FilterBarPromptVisible = true;
Gantt1->FilterBarCaption = L"This is a bit of text being displayed in the filter bar.";
Gantt1->Columns->Add(L"");
Exganttlib_tlb::IItemsPtr var_Items = Gantt1->Items;
var_Items->AddItem(TVariant("Item 1"));
var_Items->AddItem(TVariant("Item 2"));
var_Items->AddItem(TVariant("Item 3"));
Gantt1->EndUpdate();
|
|
718
|
How can I find the number of items after filtering
Gantt1->BeginUpdate();
Gantt1->Columns->Add(L"");
Exganttlib_tlb::IItemsPtr var_Items = Gantt1->Items;
long h = var_Items->AddItem(TVariant(""));
var_Items->set_CellCaption(TVariant(h),TVariant(0),TVariant(var_Items->VisibleItemCount));
Gantt1->EndUpdate();
|
|
717
|
How can I change the filter caption
Gantt1->BeginUpdate();
Gantt1->Chart->set_PaneWidth(true,0);
Gantt1->ColumnAutoResize = true;
Gantt1->ContinueColumnScroll = false;
Gantt1->MarkSearchColumn = false;
Gantt1->SearchColumnIndex = 1;
Gantt1->FilterBarPromptVisible = true;
Gantt1->FilterBarPromptType = Exganttlib_tlb::FilterPromptEnum::exFilterPromptWords | Exganttlib_tlb::FilterPromptEnum::exFilterPromptContainsAll;
Gantt1->FilterBarPromptPattern = L"london robert";
Gantt1->FilterBarCaption = L"<r>Found: ... ";
Exganttlib_tlb::IColumnsPtr var_Columns = Gantt1->Columns;
var_Columns->Add(L"Name")->Width = 96;
var_Columns->Add(L"Title")->Width = 96;
var_Columns->Add(L"City");
Exganttlib_tlb::IItemsPtr var_Items = Gantt1->Items;
long h0 = var_Items->AddItem(TVariant("Nancy Davolio"));
var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Sales Representative"));
var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("Seattle"));
h0 = var_Items->AddItem(TVariant("Andrew Fuller"));
var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Vice President, Sales"));
var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("Tacoma"));
var_Items->set_SelectItem(h0,true);
h0 = var_Items->AddItem(TVariant("Janet Leverling"));
var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Sales Representative"));
var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("Kirkland"));
h0 = var_Items->AddItem(TVariant("Margaret Peacock"));
var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Sales Representative"));
var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("Redmond"));
h0 = var_Items->AddItem(TVariant("Steven Buchanan"));
var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Sales Manager"));
var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("London"));
h0 = var_Items->AddItem(TVariant("Michael Suyama"));
var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Sales Representative"));
var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("London"));
h0 = var_Items->AddItem(TVariant("Robert King"));
var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Sales Representative"));
var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("London"));
h0 = var_Items->AddItem(TVariant("Laura Callahan"));
var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Inside Sales Coordinator"));
var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("Seattle"));
h0 = var_Items->AddItem(TVariant("Anne Dodsworth"));
var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Sales Representative"));
var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("London"));
Gantt1->EndUpdate();
|
|
716
|
While using the filter prompt is it is possible to use wild characters
Gantt1->BeginUpdate();
Gantt1->Chart->set_PaneWidth(true,0);
Gantt1->ColumnAutoResize = true;
Gantt1->ContinueColumnScroll = false;
Gantt1->MarkSearchColumn = false;
Gantt1->SearchColumnIndex = 1;
Gantt1->FilterBarPromptVisible = true;
Gantt1->FilterBarPromptType = Exganttlib_tlb::FilterPromptEnum::exFilterPromptPattern;
Gantt1->FilterBarPromptPattern = L"lon* seat*";
Exganttlib_tlb::IColumnsPtr var_Columns = Gantt1->Columns;
var_Columns->Add(L"Name")->Width = 96;
var_Columns->Add(L"Title")->Width = 96;
var_Columns->Add(L"City");
Exganttlib_tlb::IItemsPtr var_Items = Gantt1->Items;
long h0 = var_Items->AddItem(TVariant("Nancy Davolio"));
var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Sales Representative"));
var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("Seattle"));
h0 = var_Items->AddItem(TVariant("Andrew Fuller"));
var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Vice President, Sales"));
var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("Tacoma"));
var_Items->set_SelectItem(h0,true);
h0 = var_Items->AddItem(TVariant("Janet Leverling"));
var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Sales Representative"));
var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("Kirkland"));
h0 = var_Items->AddItem(TVariant("Margaret Peacock"));
var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Sales Representative"));
var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("Redmond"));
h0 = var_Items->AddItem(TVariant("Steven Buchanan"));
var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Sales Manager"));
var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("London"));
h0 = var_Items->AddItem(TVariant("Michael Suyama"));
var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Sales Representative"));
var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("London"));
h0 = var_Items->AddItem(TVariant("Robert King"));
var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Sales Representative"));
var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("London"));
h0 = var_Items->AddItem(TVariant("Laura Callahan"));
var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Inside Sales Coordinator"));
var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("Seattle"));
h0 = var_Items->AddItem(TVariant("Anne Dodsworth"));
var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Sales Representative"));
var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("London"));
Gantt1->EndUpdate();
|
|
715
|
How can I list all items that contains any of specified words, not necessary at the beggining
Gantt1->BeginUpdate();
Gantt1->Chart->set_PaneWidth(true,0);
Gantt1->ColumnAutoResize = true;
Gantt1->ContinueColumnScroll = false;
Gantt1->MarkSearchColumn = false;
Gantt1->SearchColumnIndex = 1;
Gantt1->FilterBarPromptVisible = true;
Gantt1->FilterBarPromptType = Exganttlib_tlb::FilterPromptEnum::exFilterPromptStartWords | Exganttlib_tlb::FilterPromptEnum::exFilterPromptContainsAny;
Gantt1->FilterBarPromptPattern = L"london davolio";
Exganttlib_tlb::IColumnsPtr var_Columns = Gantt1->Columns;
var_Columns->Add(L"Name")->Width = 96;
var_Columns->Add(L"Title")->Width = 96;
var_Columns->Add(L"City");
Exganttlib_tlb::IItemsPtr var_Items = Gantt1->Items;
long h0 = var_Items->AddItem(TVariant("Nancy Davolio"));
var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Sales Representative"));
var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("Seattle"));
h0 = var_Items->AddItem(TVariant("Andrew Fuller"));
var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Vice President, Sales"));
var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("Tacoma"));
var_Items->set_SelectItem(h0,true);
h0 = var_Items->AddItem(TVariant("Janet Leverling"));
var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Sales Representative"));
var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("Kirkland"));
h0 = var_Items->AddItem(TVariant("Margaret Peacock"));
var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Sales Representative"));
var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("Redmond"));
h0 = var_Items->AddItem(TVariant("Steven Buchanan"));
var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Sales Manager"));
var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("London"));
h0 = var_Items->AddItem(TVariant("Michael Suyama"));
var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Sales Representative"));
var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("London"));
h0 = var_Items->AddItem(TVariant("Robert King"));
var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Sales Representative"));
var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("London"));
h0 = var_Items->AddItem(TVariant("Laura Callahan"));
var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Inside Sales Coordinator"));
var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("Seattle"));
h0 = var_Items->AddItem(TVariant("Anne Dodsworth"));
var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Sales Representative"));
var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("London"));
Gantt1->EndUpdate();
|
|
714
|
How can I list all items that contains any of specified words, not strings
Gantt1->BeginUpdate();
Gantt1->ColumnAutoResize = true;
Gantt1->ContinueColumnScroll = false;
Gantt1->Chart->set_PaneWidth(true,0);
Gantt1->MarkSearchColumn = false;
Gantt1->SearchColumnIndex = 1;
Gantt1->FilterBarPromptVisible = true;
Gantt1->FilterBarPromptType = Exganttlib_tlb::FilterPromptEnum::exFilterPromptWords | Exganttlib_tlb::FilterPromptEnum::exFilterPromptContainsAny;
Gantt1->FilterBarPromptPattern = L"london nancy";
Exganttlib_tlb::IColumnsPtr var_Columns = Gantt1->Columns;
var_Columns->Add(L"Name")->Width = 96;
var_Columns->Add(L"Title")->Width = 96;
var_Columns->Add(L"City");
Exganttlib_tlb::IItemsPtr var_Items = Gantt1->Items;
long h0 = var_Items->AddItem(TVariant("Nancy Davolio"));
var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Sales Representative"));
var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("Seattle"));
h0 = var_Items->AddItem(TVariant("Andrew Fuller"));
var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Vice President, Sales"));
var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("Tacoma"));
var_Items->set_SelectItem(h0,true);
h0 = var_Items->AddItem(TVariant("Janet Leverling"));
var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Sales Representative"));
var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("Kirkland"));
h0 = var_Items->AddItem(TVariant("Margaret Peacock"));
var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Sales Representative"));
var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("Redmond"));
h0 = var_Items->AddItem(TVariant("Steven Buchanan"));
var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Sales Manager"));
var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("London"));
h0 = var_Items->AddItem(TVariant("Michael Suyama"));
var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Sales Representative"));
var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("London"));
h0 = var_Items->AddItem(TVariant("Robert King"));
var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Sales Representative"));
var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("London"));
h0 = var_Items->AddItem(TVariant("Laura Callahan"));
var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Inside Sales Coordinator"));
var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("Seattle"));
h0 = var_Items->AddItem(TVariant("Anne Dodsworth"));
var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Sales Representative"));
var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("London"));
Gantt1->EndUpdate();
|
|
713
|
How can I list all items that contains all specified words, not strings
Gantt1->BeginUpdate();
Gantt1->Chart->set_PaneWidth(true,0);
Gantt1->ColumnAutoResize = true;
Gantt1->ContinueColumnScroll = false;
Gantt1->MarkSearchColumn = false;
Gantt1->SearchColumnIndex = 1;
Gantt1->FilterBarPromptVisible = true;
Gantt1->FilterBarPromptType = Exganttlib_tlb::FilterPromptEnum::exFilterPromptWords | Exganttlib_tlb::FilterPromptEnum::exFilterPromptContainsAll;
Gantt1->FilterBarPromptPattern = L"london robert";
Exganttlib_tlb::IColumnsPtr var_Columns = Gantt1->Columns;
var_Columns->Add(L"Name")->Width = 96;
var_Columns->Add(L"Title")->Width = 96;
var_Columns->Add(L"City");
Exganttlib_tlb::IItemsPtr var_Items = Gantt1->Items;
long h0 = var_Items->AddItem(TVariant("Nancy Davolio"));
var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Sales Representative"));
var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("Seattle"));
h0 = var_Items->AddItem(TVariant("Andrew Fuller"));
var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Vice President, Sales"));
var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("Tacoma"));
var_Items->set_SelectItem(h0,true);
h0 = var_Items->AddItem(TVariant("Janet Leverling"));
var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Sales Representative"));
var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("Kirkland"));
h0 = var_Items->AddItem(TVariant("Margaret Peacock"));
var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Sales Representative"));
var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("Redmond"));
h0 = var_Items->AddItem(TVariant("Steven Buchanan"));
var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Sales Manager"));
var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("London"));
h0 = var_Items->AddItem(TVariant("Michael Suyama"));
var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Sales Representative"));
var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("London"));
h0 = var_Items->AddItem(TVariant("Robert King"));
var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Sales Representative"));
var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("London"));
h0 = var_Items->AddItem(TVariant("Laura Callahan"));
var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Inside Sales Coordinator"));
var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("Seattle"));
h0 = var_Items->AddItem(TVariant("Anne Dodsworth"));
var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Sales Representative"));
var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("London"));
Gantt1->EndUpdate();
|
|
712
|
I've noticed that the filtering by prompt is not case sensitive, is is possible to make it case sensitive
Gantt1->BeginUpdate();
Gantt1->ColumnAutoResize = true;
Gantt1->ContinueColumnScroll = false;
Gantt1->MarkSearchColumn = false;
Gantt1->SearchColumnIndex = 1;
Gantt1->FilterBarPromptVisible = true;
Gantt1->FilterBarPromptType = Exganttlib_tlb::FilterPromptEnum::exFilterPromptCaseSensitive | Exganttlib_tlb::FilterPromptEnum::exFilterPromptContainsAny;
Gantt1->FilterBarPromptPattern = L"Anne";
Gantt1->Chart->set_PaneWidth(true,0);
Exganttlib_tlb::IColumnsPtr var_Columns = Gantt1->Columns;
var_Columns->Add(L"Name")->Width = 96;
var_Columns->Add(L"Title")->Width = 96;
var_Columns->Add(L"City");
Exganttlib_tlb::IItemsPtr var_Items = Gantt1->Items;
long h0 = var_Items->AddItem(TVariant("Nancy Davolio"));
var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Sales Representative"));
var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("Seattle"));
h0 = var_Items->AddItem(TVariant("Andrew Fuller"));
var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Vice President, Sales"));
var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("Tacoma"));
var_Items->set_SelectItem(h0,true);
h0 = var_Items->AddItem(TVariant("Janet Leverling"));
var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Sales Representative"));
var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("Kirkland"));
h0 = var_Items->AddItem(TVariant("Margaret Peacock"));
var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Sales Representative"));
var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("Redmond"));
h0 = var_Items->AddItem(TVariant("Steven Buchanan"));
var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Sales Manager"));
var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("London"));
h0 = var_Items->AddItem(TVariant("Michael Suyama"));
var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Sales Representative"));
var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("London"));
h0 = var_Items->AddItem(TVariant("Robert King"));
var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Sales Representative"));
var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("London"));
h0 = var_Items->AddItem(TVariant("Laura Callahan"));
var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Inside Sales Coordinator"));
var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("Seattle"));
h0 = var_Items->AddItem(TVariant("Anne Dodsworth"));
var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Sales Representative"));
var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("London"));
Gantt1->EndUpdate();
|
|
711
|
Is it possible to list only items that ends with any of specified strings
Gantt1->BeginUpdate();
Gantt1->ColumnAutoResize = true;
Gantt1->ContinueColumnScroll = false;
Gantt1->MarkSearchColumn = false;
Gantt1->SearchColumnIndex = 1;
Gantt1->FilterBarPromptVisible = true;
Gantt1->FilterBarPromptType = Exganttlib_tlb::FilterPromptEnum::exFilterPromptEndWith;
Gantt1->set_FilterBarPromptColumns(TVariant("0"));
Gantt1->FilterBarPromptPattern = L"Fuller";
Gantt1->Chart->set_PaneWidth(true,0);
Exganttlib_tlb::IColumnsPtr var_Columns = Gantt1->Columns;
var_Columns->Add(L"Name")->Width = 96;
var_Columns->Add(L"Title")->Width = 96;
var_Columns->Add(L"City");
Exganttlib_tlb::IItemsPtr var_Items = Gantt1->Items;
long h0 = var_Items->AddItem(TVariant("Nancy Davolio"));
var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Sales Representative"));
var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("Seattle"));
h0 = var_Items->AddItem(TVariant("Andrew Fuller"));
var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Vice President, Sales"));
var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("Tacoma"));
var_Items->set_SelectItem(h0,true);
h0 = var_Items->AddItem(TVariant("Janet Leverling"));
var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Sales Representative"));
var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("Kirkland"));
h0 = var_Items->AddItem(TVariant("Margaret Peacock"));
var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Sales Representative"));
var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("Redmond"));
h0 = var_Items->AddItem(TVariant("Steven Buchanan"));
var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Sales Manager"));
var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("London"));
h0 = var_Items->AddItem(TVariant("Michael Suyama"));
var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Sales Representative"));
var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("London"));
h0 = var_Items->AddItem(TVariant("Robert King"));
var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Sales Representative"));
var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("London"));
h0 = var_Items->AddItem(TVariant("Laura Callahan"));
var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Inside Sales Coordinator"));
var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("Seattle"));
h0 = var_Items->AddItem(TVariant("Anne Dodsworth"));
var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Sales Representative"));
var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("London"));
Gantt1->EndUpdate();
|
|
710
|
Is it possible to list only items that ends with any of specified strings
Gantt1->BeginUpdate();
Gantt1->ColumnAutoResize = true;
Gantt1->ContinueColumnScroll = false;
Gantt1->MarkSearchColumn = false;
Gantt1->SearchColumnIndex = 1;
Gantt1->FilterBarPromptVisible = true;
Gantt1->FilterBarPromptType = Exganttlib_tlb::FilterPromptEnum::exFilterPromptEndWith;
Gantt1->set_FilterBarPromptColumns(TVariant("0"));
Gantt1->FilterBarPromptPattern = L"Fuller";
Gantt1->Chart->set_PaneWidth(true,0);
Exganttlib_tlb::IColumnsPtr var_Columns = Gantt1->Columns;
var_Columns->Add(L"Name")->Width = 96;
var_Columns->Add(L"Title")->Width = 96;
var_Columns->Add(L"City");
Exganttlib_tlb::IItemsPtr var_Items = Gantt1->Items;
long h0 = var_Items->AddItem(TVariant("Nancy Davolio"));
var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Sales Representative"));
var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("Seattle"));
h0 = var_Items->AddItem(TVariant("Andrew Fuller"));
var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Vice President, Sales"));
var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("Tacoma"));
var_Items->set_SelectItem(h0,true);
h0 = var_Items->AddItem(TVariant("Janet Leverling"));
var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Sales Representative"));
var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("Kirkland"));
h0 = var_Items->AddItem(TVariant("Margaret Peacock"));
var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Sales Representative"));
var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("Redmond"));
h0 = var_Items->AddItem(TVariant("Steven Buchanan"));
var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Sales Manager"));
var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("London"));
h0 = var_Items->AddItem(TVariant("Michael Suyama"));
var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Sales Representative"));
var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("London"));
h0 = var_Items->AddItem(TVariant("Robert King"));
var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Sales Representative"));
var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("London"));
h0 = var_Items->AddItem(TVariant("Laura Callahan"));
var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Inside Sales Coordinator"));
var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("Seattle"));
h0 = var_Items->AddItem(TVariant("Anne Dodsworth"));
var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Sales Representative"));
var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("London"));
Gantt1->EndUpdate();
|
|
709
|
Is it possible to list only items that starts with any of specified strings
Gantt1->BeginUpdate();
Gantt1->ColumnAutoResize = true;
Gantt1->ContinueColumnScroll = false;
Gantt1->MarkSearchColumn = false;
Gantt1->SearchColumnIndex = 1;
Gantt1->FilterBarPromptVisible = true;
Gantt1->FilterBarPromptType = Exganttlib_tlb::FilterPromptEnum::exFilterPromptStartWith;
Gantt1->set_FilterBarPromptColumns(TVariant("0"));
Gantt1->FilterBarPromptPattern = L"An M";
Gantt1->Chart->set_PaneWidth(true,0);
Exganttlib_tlb::IColumnsPtr var_Columns = Gantt1->Columns;
var_Columns->Add(L"Name")->Width = 96;
var_Columns->Add(L"Title")->Width = 96;
var_Columns->Add(L"City");
Exganttlib_tlb::IItemsPtr var_Items = Gantt1->Items;
long h0 = var_Items->AddItem(TVariant("Nancy Davolio"));
var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Sales Representative"));
var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("Seattle"));
h0 = var_Items->AddItem(TVariant("Andrew Fuller"));
var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Vice President, Sales"));
var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("Tacoma"));
var_Items->set_SelectItem(h0,true);
h0 = var_Items->AddItem(TVariant("Janet Leverling"));
var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Sales Representative"));
var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("Kirkland"));
h0 = var_Items->AddItem(TVariant("Margaret Peacock"));
var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Sales Representative"));
var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("Redmond"));
h0 = var_Items->AddItem(TVariant("Steven Buchanan"));
var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Sales Manager"));
var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("London"));
h0 = var_Items->AddItem(TVariant("Michael Suyama"));
var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Sales Representative"));
var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("London"));
h0 = var_Items->AddItem(TVariant("Robert King"));
var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Sales Representative"));
var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("London"));
h0 = var_Items->AddItem(TVariant("Laura Callahan"));
var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Inside Sales Coordinator"));
var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("Seattle"));
h0 = var_Items->AddItem(TVariant("Anne Dodsworth"));
var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Sales Representative"));
var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("London"));
Gantt1->EndUpdate();
|
|
708
|
Is it possible to list only items that starts with specified string
Gantt1->BeginUpdate();
Gantt1->ColumnAutoResize = true;
Gantt1->ContinueColumnScroll = false;
Gantt1->MarkSearchColumn = false;
Gantt1->SearchColumnIndex = 1;
Gantt1->FilterBarPromptVisible = true;
Gantt1->FilterBarPromptType = Exganttlib_tlb::FilterPromptEnum::exFilterPromptStartWith;
Gantt1->set_FilterBarPromptColumns(TVariant("0"));
Gantt1->FilterBarPromptPattern = L"A";
Gantt1->Chart->set_PaneWidth(true,0);
Exganttlib_tlb::IColumnsPtr var_Columns = Gantt1->Columns;
var_Columns->Add(L"Name")->Width = 96;
var_Columns->Add(L"Title")->Width = 96;
var_Columns->Add(L"City");
Exganttlib_tlb::IItemsPtr var_Items = Gantt1->Items;
long h0 = var_Items->AddItem(TVariant("Nancy Davolio"));
var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Sales Representative"));
var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("Seattle"));
h0 = var_Items->AddItem(TVariant("Andrew Fuller"));
var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Vice President, Sales"));
var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("Tacoma"));
var_Items->set_SelectItem(h0,true);
h0 = var_Items->AddItem(TVariant("Janet Leverling"));
var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Sales Representative"));
var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("Kirkland"));
h0 = var_Items->AddItem(TVariant("Margaret Peacock"));
var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Sales Representative"));
var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("Redmond"));
h0 = var_Items->AddItem(TVariant("Steven Buchanan"));
var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Sales Manager"));
var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("London"));
h0 = var_Items->AddItem(TVariant("Michael Suyama"));
var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Sales Representative"));
var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("London"));
h0 = var_Items->AddItem(TVariant("Robert King"));
var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Sales Representative"));
var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("London"));
h0 = var_Items->AddItem(TVariant("Laura Callahan"));
var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Inside Sales Coordinator"));
var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("Seattle"));
h0 = var_Items->AddItem(TVariant("Anne Dodsworth"));
var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Sales Representative"));
var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("London"));
Gantt1->EndUpdate();
|
|
707
|
How can I specify that the list should include any of the seqeunces in the pattern
Gantt1->BeginUpdate();
Gantt1->ColumnAutoResize = true;
Gantt1->ContinueColumnScroll = false;
Gantt1->MarkSearchColumn = false;
Gantt1->SearchColumnIndex = 1;
Gantt1->FilterBarPromptVisible = true;
Gantt1->FilterBarPromptType = Exganttlib_tlb::FilterPromptEnum::exFilterPromptContainsAny;
Gantt1->FilterBarPromptPattern = L"london seattle";
Gantt1->Chart->set_PaneWidth(true,0);
Exganttlib_tlb::IColumnsPtr var_Columns = Gantt1->Columns;
var_Columns->Add(L"Name")->Width = 96;
var_Columns->Add(L"Title")->Width = 96;
var_Columns->Add(L"City");
Exganttlib_tlb::IItemsPtr var_Items = Gantt1->Items;
long h0 = var_Items->AddItem(TVariant("Nancy Davolio"));
var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Sales Representative"));
var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("Seattle"));
h0 = var_Items->AddItem(TVariant("Andrew Fuller"));
var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Vice President, Sales"));
var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("Tacoma"));
var_Items->set_SelectItem(h0,true);
h0 = var_Items->AddItem(TVariant("Janet Leverling"));
var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Sales Representative"));
var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("Kirkland"));
h0 = var_Items->AddItem(TVariant("Margaret Peacock"));
var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Sales Representative"));
var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("Redmond"));
h0 = var_Items->AddItem(TVariant("Steven Buchanan"));
var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Sales Manager"));
var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("London"));
h0 = var_Items->AddItem(TVariant("Michael Suyama"));
var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Sales Representative"));
var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("London"));
h0 = var_Items->AddItem(TVariant("Robert King"));
var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Sales Representative"));
var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("London"));
h0 = var_Items->AddItem(TVariant("Laura Callahan"));
var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Inside Sales Coordinator"));
var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("Seattle"));
h0 = var_Items->AddItem(TVariant("Anne Dodsworth"));
var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Sales Representative"));
var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("London"));
Gantt1->EndUpdate();
|
|
706
|
How can I specify that all sequences in the filter pattern must be included in the list
Gantt1->BeginUpdate();
Gantt1->Chart->set_PaneWidth(true,0);
Gantt1->ColumnAutoResize = true;
Gantt1->ContinueColumnScroll = false;
Gantt1->MarkSearchColumn = false;
Gantt1->SearchColumnIndex = 1;
Gantt1->FilterBarPromptVisible = true;
Gantt1->FilterBarPromptType = Exganttlib_tlb::FilterPromptEnum::exFilterPromptContainsAll;
Gantt1->FilterBarPromptPattern = L"london manager";
Exganttlib_tlb::IColumnsPtr var_Columns = Gantt1->Columns;
var_Columns->Add(L"Name")->Width = 96;
var_Columns->Add(L"Title")->Width = 96;
var_Columns->Add(L"City");
Exganttlib_tlb::IItemsPtr var_Items = Gantt1->Items;
long h0 = var_Items->AddItem(TVariant("Nancy Davolio"));
var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Sales Representative"));
var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("Seattle"));
h0 = var_Items->AddItem(TVariant("Andrew Fuller"));
var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Vice President, Sales"));
var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("Tacoma"));
var_Items->set_SelectItem(h0,true);
h0 = var_Items->AddItem(TVariant("Janet Leverling"));
var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Sales Representative"));
var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("Kirkland"));
h0 = var_Items->AddItem(TVariant("Margaret Peacock"));
var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Sales Representative"));
var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("Redmond"));
h0 = var_Items->AddItem(TVariant("Steven Buchanan"));
var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Sales Manager"));
var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("London"));
h0 = var_Items->AddItem(TVariant("Michael Suyama"));
var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Sales Representative"));
var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("London"));
h0 = var_Items->AddItem(TVariant("Robert King"));
var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Sales Representative"));
var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("London"));
h0 = var_Items->AddItem(TVariant("Laura Callahan"));
var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Inside Sales Coordinator"));
var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("Seattle"));
h0 = var_Items->AddItem(TVariant("Anne Dodsworth"));
var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Sales Representative"));
var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("London"));
Gantt1->EndUpdate();
|
|
705
|
How do I change at runtime the filter prompt
Gantt1->BeginUpdate();
Gantt1->ColumnAutoResize = true;
Gantt1->ContinueColumnScroll = false;
Gantt1->Chart->set_PaneWidth(true,0);
Gantt1->MarkSearchColumn = false;
Gantt1->SearchColumnIndex = 1;
Gantt1->FilterBarPromptVisible = true;
Gantt1->FilterBarPromptPattern = L"london manager";
Exganttlib_tlb::IColumnsPtr var_Columns = Gantt1->Columns;
var_Columns->Add(L"Name")->Width = 96;
var_Columns->Add(L"Title")->Width = 96;
var_Columns->Add(L"City");
Exganttlib_tlb::IItemsPtr var_Items = Gantt1->Items;
long h0 = var_Items->AddItem(TVariant("Nancy Davolio"));
var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Sales Representative"));
var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("Seattle"));
h0 = var_Items->AddItem(TVariant("Andrew Fuller"));
var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Vice President, Sales"));
var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("Tacoma"));
var_Items->set_SelectItem(h0,true);
h0 = var_Items->AddItem(TVariant("Janet Leverling"));
var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Sales Representative"));
var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("Kirkland"));
h0 = var_Items->AddItem(TVariant("Margaret Peacock"));
var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Sales Representative"));
var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("Redmond"));
h0 = var_Items->AddItem(TVariant("Steven Buchanan"));
var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Sales Manager"));
var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("London"));
h0 = var_Items->AddItem(TVariant("Michael Suyama"));
var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Sales Representative"));
var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("London"));
h0 = var_Items->AddItem(TVariant("Robert King"));
var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Sales Representative"));
var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("London"));
h0 = var_Items->AddItem(TVariant("Laura Callahan"));
var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Inside Sales Coordinator"));
var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("Seattle"));
h0 = var_Items->AddItem(TVariant("Anne Dodsworth"));
var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Sales Representative"));
var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("London"));
Gantt1->EndUpdate();
|
|
704
|
How do I specify to filter only a single column when using the filter prompt
Gantt1->BeginUpdate();
Gantt1->ColumnAutoResize = true;
Gantt1->ContinueColumnScroll = false;
Gantt1->Chart->set_PaneWidth(true,0);
Gantt1->MarkSearchColumn = false;
Gantt1->SearchColumnIndex = 1;
Gantt1->FilterBarPromptVisible = true;
Gantt1->set_FilterBarPromptColumns(TVariant("2,3"));
Gantt1->FilterBarPromptPattern = L"london";
Exganttlib_tlb::IColumnsPtr var_Columns = Gantt1->Columns;
var_Columns->Add(L"Name")->Width = 96;
var_Columns->Add(L"Title")->Width = 96;
var_Columns->Add(L"City");
Exganttlib_tlb::IItemsPtr var_Items = Gantt1->Items;
long h0 = var_Items->AddItem(TVariant("Nancy Davolio"));
var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Sales Representative"));
var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("Seattle"));
h0 = var_Items->AddItem(TVariant("Andrew Fuller"));
var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Vice President, Sales"));
var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("Tacoma"));
var_Items->set_SelectItem(h0,true);
h0 = var_Items->AddItem(TVariant("Janet Leverling"));
var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Sales Representative"));
var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("Kirkland"));
h0 = var_Items->AddItem(TVariant("Margaret Peacock"));
var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Sales Representative"));
var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("Redmond"));
h0 = var_Items->AddItem(TVariant("Steven Buchanan"));
var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Sales Manager"));
var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("London"));
h0 = var_Items->AddItem(TVariant("Michael Suyama"));
var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Sales Representative"));
var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("London"));
h0 = var_Items->AddItem(TVariant("Robert King"));
var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Sales Representative"));
var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("London"));
h0 = var_Items->AddItem(TVariant("Laura Callahan"));
var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Inside Sales Coordinator"));
var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("Seattle"));
h0 = var_Items->AddItem(TVariant("Anne Dodsworth"));
var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Sales Representative"));
var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("London"));
Gantt1->EndUpdate();
|
|
703
|
How do I change the prompt or the caption being displayed in the filter bar
Gantt1->BeginUpdate();
Gantt1->Chart->set_PaneWidth(true,0);
Gantt1->ColumnAutoResize = true;
Gantt1->ContinueColumnScroll = false;
Gantt1->MarkSearchColumn = false;
Gantt1->SearchColumnIndex = 1;
Gantt1->FilterBarPromptVisible = true;
Gantt1->FilterBarPrompt = L"changed";
Exganttlib_tlb::IColumnsPtr var_Columns = Gantt1->Columns;
var_Columns->Add(L"Name")->Width = 96;
var_Columns->Add(L"Title")->Width = 96;
var_Columns->Add(L"City");
Gantt1->EndUpdate();
|
|
702
|
How do I enable the filter prompt feature
Gantt1->BeginUpdate();
Gantt1->Chart->set_PaneWidth(true,0);
Gantt1->ColumnAutoResize = true;
Gantt1->ContinueColumnScroll = false;
Gantt1->MarkSearchColumn = false;
Gantt1->SearchColumnIndex = 1;
Gantt1->FilterBarPromptVisible = true;
Exganttlib_tlb::IColumnsPtr var_Columns = Gantt1->Columns;
var_Columns->Add(L"Name")->Width = 96;
var_Columns->Add(L"Title")->Width = 96;
var_Columns->Add(L"City");
Exganttlib_tlb::IItemsPtr var_Items = Gantt1->Items;
long h0 = var_Items->AddItem(TVariant("Nancy Davolio"));
var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Sales Representative"));
var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("Seattle"));
h0 = var_Items->AddItem(TVariant("Andrew Fuller"));
var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Vice President, Sales"));
var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("Tacoma"));
var_Items->set_SelectItem(h0,true);
h0 = var_Items->AddItem(TVariant("Janet Leverling"));
var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Sales Representative"));
var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("Kirkland"));
h0 = var_Items->AddItem(TVariant("Margaret Peacock"));
var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Sales Representative"));
var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("Redmond"));
h0 = var_Items->AddItem(TVariant("Steven Buchanan"));
var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Sales Manager"));
var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("London"));
h0 = var_Items->AddItem(TVariant("Michael Suyama"));
var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Sales Representative"));
var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("London"));
h0 = var_Items->AddItem(TVariant("Robert King"));
var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Sales Representative"));
var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("London"));
h0 = var_Items->AddItem(TVariant("Laura Callahan"));
var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Inside Sales Coordinator"));
var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("Seattle"));
h0 = var_Items->AddItem(TVariant("Anne Dodsworth"));
var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Sales Representative"));
var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("London"));
Gantt1->EndUpdate();
|
|
701
|
Is it possible to colour a particular column, I mean the cell's foreground color
Gantt1->BeginUpdate();
Exganttlib_tlb::IConditionalFormatPtr var_ConditionalFormat = Gantt1->ConditionalFormats->Add(L"1",TNoParam());
var_ConditionalFormat->ForeColor = RGB(255,0,0);
var_ConditionalFormat->ApplyTo = Exganttlib_tlb::FormatApplyToEnum(0x1);
Gantt1->MarkSearchColumn = false;
Exganttlib_tlb::IColumnsPtr var_Columns = Gantt1->Columns;
var_Columns->Add(L"Column 1");
var_Columns->Add(L"Column 2");
Exganttlib_tlb::IItemsPtr var_Items = Gantt1->Items;
var_Items->set_CellCaption(TVariant(var_Items->AddItem(TVariant(0))),TVariant(1),TVariant(1));
var_Items->set_CellCaption(TVariant(var_Items->AddItem(TVariant(2))),TVariant(1),TVariant(3));
var_Items->set_CellCaption(TVariant(var_Items->AddItem(TVariant(4))),TVariant(1),TVariant(5));
Gantt1->EndUpdate();
|